diff options
| author | Craig A. Berry <craigberry@mac.com> | 2006-01-08 22:14:13 +0000 |
|---|---|---|
| committer | Craig A. Berry <craigberry@mac.com> | 2006-01-08 22:14:13 +0000 |
| commit | 03156efbedd2f4b3e75f73557ee3ec377e85c61a (patch) | |
| tree | 3cbfe8a7ebbbd6e59c7cb9edee18b2f2277be258 /lib/Test | |
| parent | 3ddf9550beac0d05119750b86cebeed0245bb44f (diff) | |
| download | perl-03156efbedd2f4b3e75f73557ee3ec377e85c61a.tar.gz | |
VMS needs the meta-quoted version of $0
p4raw-id: //depot/perl@26743
Diffstat (limited to 'lib/Test')
| -rw-r--r-- | lib/Test/Simple/t/is_deeply_fail.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Test/Simple/t/is_deeply_fail.t b/lib/Test/Simple/t/is_deeply_fail.t index efbbddd7b2..94ece33edb 100644 --- a/lib/Test/Simple/t/is_deeply_fail.t +++ b/lib/Test/Simple/t/is_deeply_fail.t @@ -364,7 +364,7 @@ ERR ok !is_deeply( $glob1, $glob2 ), 'typeglobs'; is( $out, "not ok 28\n" ); like( $err, <<ERR, ' right diagnostic' ); -# Failed test in $0 at line 357. +# Failed test in $Filename at line 357. # Structures begin differing at: # \\\$got = GLOB\\(0x[0-9a-f]+\\) # \\\$expected = GLOB\\(0x[0-9a-f]+\\) |