Re: [ID 20010720.010] WHere's [:isprint:]?

[p5sagit/p5-mst-13.2.git] / ext / POSIX / sigaction.t

diff --git a/ext/POSIX/sigaction.t b/ext/POSIX/sigaction.t
index 999592d..70e8e19 100644 (file)
--- a/ext/POSIX/sigaction.t
+++ b/ext/POSIX/sigaction.t
@@ -117,7 +117,7 @@ eval {
 };
 print $@ ? "ok 17\n" : "not ok 17\n";
 
-if ($^O e 'VMS') {
+if ($^O eq 'VMS') {
     print "ok 18 # Skip: SIGCONT not trappable in $^O\n";
 } else {
     $newaction=POSIX::SigAction->new(sub { $ok10=1; });