X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Fvmsish.pm;h=30c8eb1656d7fd1eee266b2158c68467530943a3;hb=50109ad0d28b27abe5ee82def070e14b4526321c;hp=4907ad388d2c445f68cd93c9925fe3f608b7f60d;hpb=2af1ab88da52f38a7450a6455bc28aa93c8e4e57;p=p5sagit%2Fp5-mst-13.2.git diff --git a/lib/vmsish.pm b/lib/vmsish.pm index 4907ad3..30c8eb1 100644 --- a/lib/vmsish.pm +++ b/lib/vmsish.pm @@ -1,6 +1,6 @@ package vmsish; -our $VERSION = '1.01'; +our $VERSION = '1.02'; =head1 NAME @@ -54,7 +54,7 @@ default of Universal Time (a.k.a Greenwich Mean Time, or GMT). This suppresses printing of VMS status messages to SYS$OUTPUT and SYS$ERROR if Perl terminates with an error status. and allows programs that are expecting "unix-style" Perl to avoid having to parse -VMS error messages. It does not supress any messages from Perl +VMS error messages. It does not suppress any messages from Perl itself, just the messages generated by DCL after Perl exits. The DCL symbol $STATUS will still have the termination status, but with a high-order bit set: @@ -103,7 +103,7 @@ Note that an exit() or die() that is compiled 'hushed' because of "use vmsish" is not un-hushed by calling vmsish::hushed(0) at runtime. The messages from error exits from inside the Perl core are generally -more serious, and are not supressed. +more serious, and are not suppressed. =back