Code

patch 1687818
authorbuliabyak <buliabyak@users.sourceforge.net>
Wed, 18 Apr 2007 00:23:33 +0000 (00:23 +0000)
committerbuliabyak <buliabyak@users.sourceforge.net>
Wed, 18 Apr 2007 00:23:33 +0000 (00:23 +0000)
share/extensions/ill2svg.pl

index 87688869034a05ab4320a3d063fdd5730aefd9c3..60c4fe1db004892b34c2d5ad5242342fdeffa611 100644 (file)
@@ -355,20 +355,9 @@ print " xmlns=\"http://www.w3.org/2000/svg\"";
 print " xmlns:xlink=\"http://www.w3.org/1999/xlink\">\r\n";
 
 while (<>) {
-    if (m/$NL_DOS$/) { 
-       $/ = $NL_DOS; 
-       foreach (split /$NL_DOS/) {
-           process_line($_);
-       }
-    } elsif (m/$NL_MAC$/) {
-       $/ = $NL_MAC;
-       foreach (split /$NL_MAC/) {
-           process_line($_);
-       }
-    } else {
-       chomp;
+    foreach (split /[\015\012]+/) {
        process_line($_);
-    }
+      }
 }
 print "</svg>\n";