1 files changed, 1 insertions, 2 deletions
diff --git a/lib/Exporter.pm b/lib/Exporter.pm
index 3f42e407e0..a66079a142 100644
--- a/lib/Exporter.pm
+++ b/lib/Exporter.pm
@@ -170,8 +170,7 @@ sub export {
 sub export_to_level
 {
       my $pkg = shift;
-      my ($level, $junk) = (shift, shift);  # need to get rid of first arg
-                                            # we know it already.
+      my $level = shift;
       my $callpkg = caller($level);
       $pkg->export($callpkg, @_);
 }