projects
/
p5sagit/p5-mst-13.2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
[Encode] UTF-7 Support
[p5sagit/p5-mst-13.2.git]
/
lib
/
Shell.pm
diff --git
a/lib/Shell.pm
b/lib/Shell.pm
index
9762a3a
..
81b2598
100644
(file)
--- a/
lib/Shell.pm
+++ b/
lib/Shell.pm
@@
-30,6
+30,7
@@
sub AUTOLOAD {
$cmd =~ s/^.*:://;
eval <<"*END*";
sub $AUTOLOAD {
+ shift if ref \$_[0] && \$_[0]->isa( 'Shell' );
if (\@_ < 1) {
\$Shell::capture_stderr ? `$cmd 2>&1` : `$cmd`;
} elsif ('$^O' eq 'os2') {