projects
/
perl
/
modules
/
subs-auto.git
/ commitdiff
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
| inline |
side by side
(parent:
a96f9f0
)
'sub foo; print foo 1' compiles to 'print(foo(1))'
author
Vincent Pit <vince@profvince.com>
Mon, 22 Sep 2008 17:20:59 +0000 (19:20 +0200)
committer
Vincent Pit <vince@profvince.com>
Mon, 22 Sep 2008 17:20:59 +0000 (19:20 +0200)
lib/subs/auto.pm
patch
|
blob
|
history
diff --git
a/lib/subs/auto.pm
b/lib/subs/auto.pm
index 3a38497688c64975639d0c65dd529c858fb37cab..64e9d57cd574b4ea933267bb1377b9082cda7b52 100644
(file)
--- a/
lib/subs/auto.pm
+++ b/
lib/subs/auto.pm
@@
-35,7
+35,7
@@
our $VERSION = '0.03';
foo->meth; # "'foo'->meth" if you have use'd foo somewhere,
# or "foo()->meth" otherwise
print foo 'wut'; # print to the filehandle foo if it's actually one,
- # or "
foo()->print('wut'
)" otherwise
+ # or "
print(foo('wut')
)" otherwise
} # ... but function calls will fail at run-time if you don't
# actually define foo somewhere