diff options
author | Guenter Knauf <lists@gknw.net> | 2012-07-20 17:22:10 +0200 |
---|---|---|
committer | Guenter Knauf <lists@gknw.net> | 2012-07-20 17:22:10 +0200 |
commit | 0f15ed1617b0798c0469103a8b431f5d5ce9b01c (patch) | |
tree | 14af34cca4698da132eff7d4e8c474c85b5ac511 /tests/libtest | |
parent | 5d80017fd6c498764cbbfe86496d62db675a37e8 (diff) |
Fixed CR issue with Win32 version on MSYS.
Previous fix didnt work on Linux ...
Diffstat (limited to 'tests/libtest')
-rwxr-xr-x | tests/libtest/test1013.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/libtest/test1013.pl b/tests/libtest/test1013.pl index 2f67717c5..15e121415 100755 --- a/tests/libtest/test1013.pl +++ b/tests/libtest/test1013.pl @@ -14,10 +14,11 @@ my $curl_protocols=""; open(CURL, "$ARGV[1]") || die "Can't get curl $what list\n"; while( <CURL> ) { - $curl_protocols = lc($_ =~ s/\r//) if ( /$what:/i ); + $curl_protocols = lc($_) if ( /$what:/i ); } close CURL; +$curl_protocols =~ s/\r//; $curl_protocols =~ /\w+: (.*)$/; @curl = split / /,$1; |