Extra noise from File::Spec.
Jarkko Hietaniemi [Mon, 28 Jul 2003 10:00:11 +0000 (10:00 +0000)]
p4raw-id: //depot/perl@20256

lib/File/Spec/t/rel2abs2rel.t

index dbfb57c..79119e0 100644 (file)
@@ -50,7 +50,7 @@ sub sayok{
     return $output;
 }
 
-print "Checking manipulations of \$^X=$^X\n";
+print "# Checking manipulations of \$^X=$^X\n";
 
 my $perl = safe_rel($^X);
 is( sayok($perl), "ok\n",   "`$perl rel2abs2rel$$.pl` works" );