diff --git a/tests/getpart.pm b/tests/getpart.pm index 92a237830..2b4abf3b1 100644 --- a/tests/getpart.pm +++ b/tests/getpart.pm @@ -213,9 +213,10 @@ sub compareparts { # we cannot compare arrays index per index since with the base64 chunks, # they may not be "evenly" distributed - # NOTE: this no longer strips off carriage returns from the arrays. Is that - # really necessary? It ruins the testing of newlines. I believe it was once - # added to enable tests on win32. + if($^O eq "MSWin32" || $^O eq "msys") { + $first =~ s/\r\n/\n/g; + $second =~ s/\r\n/\n/g; + } if($first ne $second) { return 1;