From: Nick Ing-Simmons <nik@tiuk.ti.com>
Date: Sat, 22 Dec 2001 10:49:27 +0000 (+0000)
Subject: Fix mis-parse of autoloaded usage code by declaring the sub
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f2b27c0ebcd845b38b64790a1a1a6ac3dbdb148e;p=p5sagit%2Fp5-mst-13.2.git

Fix mis-parse of autoloaded usage code by declaring the sub

p4raw-id: //depot/perlio@13846
---

diff --git a/ext/POSIX/POSIX.pm b/ext/POSIX/POSIX.pm
index 92a3182..96555a5 100644
--- a/ext/POSIX/POSIX.pm
+++ b/ext/POSIX/POSIX.pm
@@ -20,6 +20,8 @@ sub import {
 }
 
 sub croak { require Carp;  goto &Carp::croak }
+# declare usage to assist AutoLoad
+sub usage;
 
 XSLoader::load 'POSIX', $VERSION;
 
@@ -56,17 +58,17 @@ sub POSIX::SigAction::new {
 1;
 __END__
 
-sub usage { 
+sub usage {
     my ($mess) = @_;
     croak "Usage: POSIX::$mess";
 }
 
-sub redef { 
+sub redef {
     my ($mess) = @_;
     croak "Use method $mess instead";
 }
 
-sub unimpl { 
+sub unimpl {
     my ($mess) = @_;
     $mess =~ s/xxx//;
     croak "Unimplemented: POSIX::$mess";
@@ -898,7 +900,7 @@ for (values %EXPORT_TAGS) {
     chmod mkdir stat umask
     times
     wait waitpid
-    gmtime localtime time 
+    gmtime localtime time
     alarm chdir chown close fork getlogin getppid getpgrp link
 	pipe read rmdir sleep unlink write
     utime