projects
/
perl
/
modules
/
subs-auto.git
/ commitdiff
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
| inline |
side by side
(parent:
46cd890
)
Make Perl version numbers more readable
author
Vincent Pit <vince@profvince.com>
Sat, 24 Aug 2013 18:28:46 +0000 (15:28 -0300)
committer
Vincent Pit <vince@profvince.com>
Sat, 24 Aug 2013 18:46:55 +0000 (15:46 -0300)
lib/subs/auto.pm
patch
|
blob
|
history
diff --git
a/lib/subs/auto.pm
b/lib/subs/auto.pm
index d92f17a7691c8ebaed9fa4dbb0582b686f1dfe40..81ae297b55d17ed7916783acf6293d12bb8e682f 100644
(file)
--- a/
lib/subs/auto.pm
+++ b/
lib/subs/auto.pm
@@
-87,7
+87,7
@@
my %core;
delete @core{qw<my local>};
BEGIN {
- *_REFCNT_PLACEHOLDERS = eval 'sub () { ' . ("$]" < 5.011002 ? 0 : 1) . '}'
+ *_REFCNT_PLACEHOLDERS = eval 'sub () { ' . ("$]" < 5.011
_
002 ? 0 : 1) . '}'
}
my $tag = wizard data => sub { \(my $data = _REFCNT_PLACEHOLDERS ? 2 : 1) };
@@
-256,7
+256,7
@@
L<Variable::Magic> with C<uvar> magic enabled (this should be assured by the req
L<B::Keywords>.
-L<Carp> (standard since perl 5), L<XSLoader> (since 5.
006
).
+L<Carp> (standard since perl 5), L<XSLoader> (since 5.
6.0
).
=head1 AUTHOR