From d1f145d342e491f3bdc2d057c6771a7a5baba14a Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Wed, 26 Sep 2001 11:58:11 +0000 Subject: [PATCH] grrr. p4raw-id: //depot/perl@12234 --- t/op/gv.t | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/t/op/gv.t b/t/op/gv.t index 8654dc2..a423cb4 100755 --- a/t/op/gv.t +++ b/t/op/gv.t @@ -111,7 +111,7 @@ print {*x{IO}} "ok 23\n"; $warn .= $_[0]; }; my $val = *x{FILEHANDLE}; - print {*x{IO}} ($warn =~ /is deprecated/ ? "ok 42\n" : "not ok 42\n"); + print {*x{IO}} ($warn =~ /is deprecated/ ? "ok 24\n" : "not ok 24\n"); } -- 2.7.4