From: Michael G. Schwern Date: Wed, 5 Dec 2001 02:47:59 +0000 (-0500) Subject: Removing a TODO X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c721372142d4c809beb9dbba1d6d9e8702004478;p=p5sagit%2Fp5-mst-13.2.git Removing a TODO Message-ID: <20011205024759.H14333@blackrider> p4raw-id: //depot/perl@13471 --- diff --git a/t/op/magic.t b/t/op/magic.t index 4f38623..f9df5bd 100755 --- a/t/op/magic.t +++ b/t/op/magic.t @@ -250,10 +250,7 @@ else { : (`echo \$__NoNeSuCh` eq "foo\n") ); } -if ($Is_VMS) { - ok(1,0,"'\$!=undef' does throw a warning"); -} -else { +{ local $SIG{'__WARN__'} = sub { print "# @_\nnot " }; $! = undef; ok 1;