Subversion Repositories fastphp

Rev

Rev 96 | Rev 98 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 96 Rev 97
Line 1291... Line 1291...
1291
          eolStyle := #13#10; // (Should not happen)
1291
          eolStyle := #13#10; // (Should not happen)
1292
      end;
1292
      end;
1293
    end;
1293
    end;
1294
 
1294
 
1295
    // Unitfy line-endings
1295
    // Unitfy line-endings
1296
    str := StringReplace(str, #13#10, eolStyle, [rfReplaceAll]);
-
 
1297
    str := StringReplace(str, #10, eolStyle, [rfReplaceAll]);
-
 
1298
    str := StringReplace(str, #13, '', [rfReplaceAll]);
1296
    str := StringReplace(str, #13, '', [rfReplaceAll]);
-
 
1297
    str := StringReplace(str, #10, eolStyle, [rfReplaceAll]);
1299
 
1298
 
1300
    // Replace all trailing linebreaks by a single line break
1299
    // Replace all trailing linebreaks by a single line break
1301
    // Note: Removing all line breaks is not good, since Linux's "nano" will
1300
    // Note: Removing all line breaks is not good, since Linux's "nano" will
1302
    //       re-add a linebreak at the end of the file
1301
    //       re-add a linebreak at the end of the file
1303
    str := TrimRight(str) + eolStyle;
1302
    str := TrimRight(str) + eolStyle;