diff options
| author | Nicholas Clark <nick@ccl4.org> | 2011-02-18 15:57:25 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2011-02-18 18:21:12 +0000 |
| commit | ef35b8f9beb00e91a540c31feaa3e68208b82d7c (patch) | |
| tree | 172c7d1dbdda1a8430db778296403db8f51a848e /lib | |
| parent | 411c557297fce888191c9934f2eee1dfd34146e0 (diff) | |
| download | perl-ef35b8f9beb00e91a540c31feaa3e68208b82d7c.tar.gz | |
In deprecate.pm, remove unused variable $line
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/deprecate.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/deprecate.pm b/lib/deprecate.pm index 7b92e0be7c..b5f1793395 100644 --- a/lib/deprecate.pm +++ b/lib/deprecate.pm @@ -1,14 +1,14 @@ package deprecate; use strict; use warnings; -our $VERSION = 0.01; +our $VERSION = 0.02; # our %Config can ignore %Config::Config, e.g. for testing our %Config; unless (%Config) { require Config; *Config = \%Config::Config; } sub import { - my ($package, $file, $line) = caller; + my ($package, $file) = caller; my $expect_leaf = "$package.pm"; $expect_leaf =~ s!::!/!g; |