]> git.imager.perl.org - imager.git/commitdiff
include the unknown words on STDERR for spelling failures
authorTony Cook <tony@develop-help.com>
Sat, 12 Nov 2011 02:30:02 +0000 (13:30 +1100)
committerTony Cook <tony@develop-help.com>
Sat, 12 Nov 2011 02:30:02 +0000 (13:30 +1100)
This avoids a step in tracking down such failures.

t/x20spell.t

index 030997a421041d3b20f2a58bba4ea8d3234fca90..d519c87e3529d7b1fd6fcf2a9d9fe1eedddfdb56 100644 (file)
@@ -74,7 +74,7 @@ for my $file (@pod) {
   my @out = `aspell list <$check_filename`;
   unless (ok(@out == 0, "spell check $file")) {
     chomp @out;
-    print "# $_\n" for @out;
+    diag $_ for @out;
     print "#----\n";
     open my $fh, "<", $check_filename;
     while (<$fh>) {