develooper Front page | perl.vmsperl | Postings from December 2001

[PATCH t/op/magic.t] Removing a TODO

From:
Michael G Schwern
Date:
December 4, 2001 23:48
Subject:
[PATCH t/op/magic.t] Removing a TODO
Message ID:
20011205024759.H14333@blackrider
This test passes now, no more need for the TODO.


--- t/op/magic.t	2001/12/05 07:45:55	1.1
+++ t/op/magic.t	2001/12/05 07:46:09
@@ -250,10 +250,7 @@
 			    : (`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;


-- 

Michael G. Schwern   <schwern@pobox.com>    http://www.pobox.com/~schwern/
Perl Quality Assurance	    <perl-qa@perl.org>	       Kwalitee Is Job One
And it's made from all-natural baby skin, so you know it's good for the
environment.
	http://www.goats.com/archive/000606.html



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About