diff options
author | Tim Bunce <Tim.Bunce@ig.co.uk> | 1997-08-07 00:00:00 +1200 |
---|---|---|
committer | Tim Bunce <Tim.Bunce@ig.co.uk> | 1997-08-07 00:00:00 +1200 |
commit | 2b2e613fb683b18fec6c1b153fb94a523bc015b0 (patch) | |
tree | 0e72fdb93c4c7c31f5254b239e89931150292684 /lib/Shell.pm | |
parent | 40d50c580e6c25e8b1b8fe1baed51a3d15af70f9 (diff) | |
download | perl-2b2e613fb683b18fec6c1b153fb94a523bc015b0.tar.gz |
Warning from calls using "use Shell"
(this is the same change as commit a5bda13b0ef005fbbd13265a362caff51359bbc6, but as applied)
Diffstat (limited to 'lib/Shell.pm')
-rw-r--r-- | lib/Shell.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Shell.pm b/lib/Shell.pm index bb44b5398b..f4ef431cc5 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`; } |