X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Fvmsish.pm;h=a11c364167512b0e813dd24e1d8b333c11abfebf;hb=7b9ef14019d3c4d1aa14641dbd421c81c2cd18a4;hp=4907ad388d2c445f68cd93c9925fe3f608b7f60d;hpb=2af1ab88da52f38a7450a6455bc28aa93c8e4e57;p=p5sagit%2Fp5-mst-13.2.git diff --git a/lib/vmsish.pm b/lib/vmsish.pm index 4907ad3..a11c364 100644 --- a/lib/vmsish.pm +++ b/lib/vmsish.pm @@ -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