Todo update.

[p5sagit/p5-mst-13.2.git] / lib / Shell.pm

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