projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
114bafb
)
elide bogus test in change#6132
author
Gurusamy Sarathy
<gsar@cpan.org>
Sun, 28 May 2000 08:08:05 +0000
(08:08 +0000)
committer
Gurusamy Sarathy
<gsar@cpan.org>
Sun, 28 May 2000 08:08:05 +0000
(08:08 +0000)
p4raw-link: @6132 on //depot/perl:
114bafba71b4fe6a08258e1f6dfc504b5d9fd70c
p4raw-id: //depot/perl@6133
t/pragma/warn/9enabled
patch
|
blob
|
history
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