Add better debug to glob/basic #8 as suggested by Nicholas Clark
Jarkko Hietaniemi [Thu, 17 May 2001 20:32:48 +0000 (20:32 +0000)]
in 20001222.001.

p4raw-id: //depot/perl@10150

t/lib/glob-basic.t

index 6c12c26..fe7f9ef 100755 (executable)
@@ -118,9 +118,10 @@ unless (@a == 3
         and $a[1] eq 'a'
         and $a[2] eq 'b')
 {
-    print "not ";
+    print "not ok 8 # @a";
+} else {
+    print "ok 8\n";
 }
-print "ok 8\n";
 
 # "~" should expand to $ENV{HOME}
 $ENV{HOME} = "sweet home";