summaryrefslogtreecommitdiff
path: root/src/lib/libcrypto/util/copy.pl
diff options
context:
space:
mode:
authordjm <>2010-10-01 22:54:19 +0000
committerdjm <>2010-10-01 22:54:19 +0000
commit5bf424abe3e333358a0476841d2085fb5870dde9 (patch)
tree03b202b49e2c6367ae5dec12d939ea99c9ca36b3 /src/lib/libcrypto/util/copy.pl
parent31f27c0675424c286ead39df16455abf64c6fb22 (diff)
parent2dd8058114e20f1cd7c897166a4ce75ed390ee54 (diff)
downloadopenbsd-5bf424abe3e333358a0476841d2085fb5870dde9.tar.gz
openbsd-5bf424abe3e333358a0476841d2085fb5870dde9.tar.bz2
openbsd-5bf424abe3e333358a0476841d2085fb5870dde9.zip
This commit was generated by cvs2git to track changes on a CVS vendor
branch.
Diffstat (limited to 'src/lib/libcrypto/util/copy.pl')
-rw-r--r--src/lib/libcrypto/util/copy.pl11
1 files changed, 0 insertions, 11 deletions
diff --git a/src/lib/libcrypto/util/copy.pl b/src/lib/libcrypto/util/copy.pl
index eba6d5815e..e20b45530a 100644
--- a/src/lib/libcrypto/util/copy.pl
+++ b/src/lib/libcrypto/util/copy.pl
@@ -8,16 +8,9 @@ use Fcntl;
8# Perl script 'copy' comment. On Windows the built in "copy" command also 8# Perl script 'copy' comment. On Windows the built in "copy" command also
9# copies timestamps: this messes up Makefile dependencies. 9# copies timestamps: this messes up Makefile dependencies.
10 10
11my $stripcr = 0;
12
13my $arg; 11my $arg;
14 12
15foreach $arg (@ARGV) { 13foreach $arg (@ARGV) {
16 if ($arg eq "-stripcr")
17 {
18 $stripcr = 1;
19 next;
20 }
21 $arg =~ s|\\|/|g; # compensate for bug/feature in cygwin glob... 14 $arg =~ s|\\|/|g; # compensate for bug/feature in cygwin glob...
22 foreach (glob $arg) 15 foreach (glob $arg)
23 { 16 {
@@ -56,10 +49,6 @@ foreach (@filelist)
56 || die "Can't Open $dfile"; 49 || die "Can't Open $dfile";
57 while (sysread IN, $buf, 10240) 50 while (sysread IN, $buf, 10240)
58 { 51 {
59 if ($stripcr)
60 {
61 $buf =~ tr/\015//d;
62 }
63 syswrite(OUT, $buf, length($buf)); 52 syswrite(OUT, $buf, length($buf));
64 } 53 }
65 close(IN); 54 close(IN);