X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Fsubs-auto.git;a=blobdiff_plain;f=lib%2Fsubs%2Fauto.pm;h=08f38e2c19fc138985a083a19fae69d98e5be3b1;hp=13568acf02ac3419c0fb6222aa4b22c2cf50cedc;hb=8d2bccf19c13e6c8105cf04cb13481dfe133014f;hpb=a0ade8a080a0ebf61171ee3082183cd2e53f59af diff --git a/lib/subs/auto.pm b/lib/subs/auto.pm index 13568ac..08f38e2 100644 --- a/lib/subs/auto.pm +++ b/lib/subs/auto.pm @@ -78,7 +78,7 @@ my @core = qw/abs accept alarm atan2 bind binmode bless break caller chdir time times truncate uc ucfirst umask undef unlink unpack unshift untie use utime values vec wait waitpid wantarray warn when write/; -push @core,qw/not/; +push @core,qw/not __LINE__ __FILE__/; my %core; @core{@core} = ();