From: Tim Bunce <Tim.Bunce@ig.co.uk>
Date: Wed, 6 Aug 1997 12:00:00 +0000 (+1200)
Subject: Warning from calls using "use Shell"
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2b2e613fb683b18fec6c1b153fb94a523bc015b0;p=p5sagit%2Fp5-mst-13.2.git

Warning from calls using "use Shell"

(this is the same change as commit a5bda13b0ef005fbbd13265a362caff51359bbc6, but as applied)
---

diff --git a/lib/Shell.pm b/lib/Shell.pm
index bb44b53..f4ef431 100644
--- a/lib/Shell.pm
+++ b/lib/Shell.pm
@@ -21,7 +21,7 @@ AUTOLOAD {
     my $cmd = $AUTOLOAD;
     $cmd =~ s/^.*:://;
     eval qq {
-	sub $AUTOLOAD {
+	*$AUTOLOAD = sub {
 	    if (\@_ < 1) {
 		`$cmd`;
 	    }