| Subject: | [PATCH] Fix test failure in t/text.t |
The attached patch corrects the following failure in t/text.t:
/usr/bin/perl.exe "-MExtUtils::Command::MM" "-e" "test_harness(0,
'blib/lib', 'blib/arch')" t/*.t
t/basic...........ok
t/color...........ok
t/filehandle......ok
t/man-options.....ok
t/man.............ok
t/parselink.......ok
t/pod-parser......ok
t/pod.............ok
1/1 skipped: various reasons
t/termcap.........ok
t/text-options....ok
t/text............FAILED test 4
Failed 1/4 tests, 75.00% okay
Failed Test Stat Wstat Total Fail List of Failed
-------------------------------------------------------------------------------
t/text.t 4 1 4
1 subtest skipped.
Failed 1/11 test scripts. 1/82 subtests failed.
Files=11, Tests=82, 3 wallclock secs ( 2.13 cusr + 0.85 csys = 2.98 CPU)
Failed 1/11 test programs. 1/82 subtests failed.
Show quoted text
> perl -Mblib t/text.t
1..4
ok 1
ok 2
ok 3
not ok 4
Expected
========
Test of S<>
This is some whitespace.
Output
======
Test of S<>
This is some whitespace.
The cause of the failure is a difference in the number of newlines in
the two values.
This is with Perl 5.8.x under Cygwin on Windows.
| Subject: | patch.txt |
--- podlators-2.1.0/t/text.t
+++ podlators-2.1.0/t/text.t
@@ -61,7 +61,7 @@
print "ok $n # skip Pod::Simple S<> parsing bug\n";
} else {
print "not ok $n\n";
- print "Expected\n========\n$expected\nOutput\n======\n$output\n";
+ print "Expected\n========\n'$expected'\nOutput\n======\n'$output'\n";
}
$n++;
}
@@ -99,5 +99,6 @@
###
Test of S<>
This is some whitespace.
+
###
==