elide bogus test in change#6132

p4raw-link: @6132 on //depot/perl: 114bafba71b4fe6a08258e1f6dfc504b5d9fd70c

p4raw-id: //depot/perl@6133

diff --git a/t/pragma/warn/9enabled b/t/pragma/warn/9enabled
index 05170f3..96f319e 100755 (executable)
--- a/t/pragma/warn/9enabled
+++ b/t/pragma/warn/9enabled
@@ -901,23 +901,3 @@ EXPECT
 ok1
 ok2
 ok3
-########
-
---FILE-- abc.pm
-package abc ;
-no warnings ;
-use warnings::register ;
-sub check { 
-  local $^W = 1 ;
-  print "ok1\n" if !warnings::enabled() ;
-  print "ok2\n" if !warnings::enabled("io") ;
-  print "ok3\n" if !warnings::enabled("all") ;
-}
-1;
---FILE-- 
-use abc ;
-abc::check() ;
-EXPECT
-ok1
-ok2
-ok3