http://se.aminet.net/pub/Linux/distributions/slackware/slackware-10.1/source/xap...

[xscreensaver] / utils / ad2c

diff --git a/utils/ad2c b/utils/ad2c
index 1435e554c0fdd235e4ca888b89cb66a2618e9598..0a543ba9b2d366fb1fdcf333bbee25c8833bb317 100755 (executable)
--- a/utils/ad2c
+++ b/utils/ad2c
@@ -11,8 +11,12 @@
 #              with Sun sed, of course.
 #      7 Jan 1992: matthew@sunpix.East.Sun.COM (Matthew Stier)
 #              Escape quotes after escaping backslashes.
+#       22 Oct 2004: jwz:
+#              Convert CR to LF.
 #
 
+#sed 's/\r/\n/g' "$@" |
+perl -npe 's/\r/\n/g' < "$@" |
 sed '
 /^!/d
 /^$/d
@@ -35,4 +39,4 @@ s/\\n/\\\\n/g
 s/\\t/\\\\t/g
 s/\\f/\\\\f/g
 s/\\b/\\\\b/g
-b test' "$@"
+b test'