X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Fautouse.pm;h=cbde3864bf1d6dd1c2711c031353786e645b9e44;hb=cca8f13b7a786baee2df1fba298a1923907c3bad;hp=67c4e01d1dea384b943c9b0cb2896324aec087a4;hpb=bc6dddacc1f7827aa418855fd57066ca3b6f5230;p=p5sagit%2Fp5-mst-13.2.git diff --git a/lib/autouse.pm b/lib/autouse.pm index 67c4e01..cbde386 100644 --- a/lib/autouse.pm +++ b/lib/autouse.pm @@ -1,9 +1,9 @@ package autouse; #use strict; # debugging only -use 5.003_90; # ->can, for my $var +use 5.006; # use warnings -$autouse::VERSION = '1.05'; +$autouse::VERSION = '1.06'; $autouse::DEBUG ||= 0; @@ -53,7 +53,7 @@ sub import { require $pm; vet_import $module; } - no warnings 'redefine'; + no warnings qw(redefine prototype); *$closure_import_func = \&{"${module}::$closure_func"}; print "autousing $module; " ."imported $closure_func as $closure_import_func\n"