diff options
Diffstat (limited to 'src/mkhelp.pl')
-rw-r--r-- | src/mkhelp.pl | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/src/mkhelp.pl b/src/mkhelp.pl index 7ed86f7cd..088a09a06 100644 --- a/src/mkhelp.pl +++ b/src/mkhelp.pl @@ -54,6 +54,9 @@ while (<STDIN>) { # this should be removed: $line =~ s/(.|_)//g; + # remove trailing CR from line. msysgit checks out files as line+CRLF + $line =~ s/\r$//; + if($line =~ /^([ \t]*\n|curl)/i) { # cut off headers and empty lines $wline++; # count number of cut off lines @@ -90,7 +93,12 @@ open(READ, "<$README") || die "couldn't read the README infile $README"; while(<READ>) { - push @out, $_; + my $line = $_; + + # remove trailing CR from line. msysgit checks out files as line+CRLF + $line =~ s/\r$//; + + push @out, $line; } close(READ); |