documentation should use "DHE" instead of "EDH"

[openssl.git] / util / copy.pl

diff --git a/util/copy.pl b/util/copy.pl
index 73ac928ed277a6ae3f8ada78a27cf4fa23793d3a..eba6d5815e9cef6b312e71cdee6f5642b2ac06af 100644 (file)
--- a/util/copy.pl
+++ b/util/copy.pl
@@ -8,9 +8,17 @@ use Fcntl;
 # Perl script 'copy' comment. On Windows the built in "copy" command also
 # copies timestamps: this messes up Makefile dependencies.
 
+my $stripcr = 0;
+
 my $arg;
 
 foreach $arg (@ARGV) {
+       if ($arg eq "-stripcr")
+               {
+               $stripcr = 1;
+               next;
+               }
+       $arg =~ s|\\|/|g;       # compensate for bug/feature in cygwin glob...
        foreach (glob $arg)
                {
                push @filelist, $_;
@@ -48,6 +56,10 @@ foreach (@filelist)
                                        || die "Can't Open $dfile";
        while (sysread IN, $buf, 10240)
                {
+               if ($stripcr)
+                       {
+                       $buf =~ tr/\015//d;
+                       }
                syswrite(OUT, $buf, length($buf));
                }
        close(IN);