diff options
| author |  Christian Hesse <mail@eworm.de> | 2024-07-11 23:08:42 +0200 |
|---|---|---|
| committer | Christian Hesse <mail@eworm.de> | 2024-07-16 13:50:22 +0200 |
| commit | 2fd0d27447b8ce6620ec3f6d68c9d5ca62bb9f02 (patch) | |
| tree | 47e32599acb33086576b0d90e17b612f6f77a95c | |
| parent | 8f75d542f3aa7cb3c5726412daa0ab41c6880489 (diff) | |
global-functions: $Unix2Dos: use :tocrlf
| -rw-r--r-- | global-functions.rsc | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/global-functions.rsc b/global-functions.rsc index 950ccd6..54dcb68 100644 --- a/global-functions.rsc +++ b/global-functions.rsc @@ -1433,12 +1433,7 @@ # convert line endings, UNIX -> DOS :set Unix2Dos do={ - :local Input [ :tostr $1 ]; - - :global CharacterReplace; - - :return [ $CharacterReplace [ $CharacterReplace $Input \ - ("\n") ("\r\n") ] ("\r\r\n") ("\r\n") ]; + :return [ :tocrlf [ :tostr $1 ] ]; } # url encoding |