--- parrot-svn/t/pmc/os.t 2009-03-16 08:58:21.000000000 -0400 +++ parrot-andy/t/pmc/os.t 2009-03-16 12:31:31.000000000 -0400 @@ -377,7 +378,7 @@ $P1 = new ['OS'] $S1 = "xpto" - $S2 = "MANIFEST" + $S2 = "myconfig" $P1."link"($S2, $S1) print "ok\n" @@ -388,7 +389,7 @@ ok OUT - my $nl = [ stat("MANIFEST") ]->[3]; + my $nl = [ stat("myconfig") ]->[3]; ok( $nl > 1, "hard link to file was really created" ); unlink "xpto" if -f "xpto"; }