Remove unused lexical present since change 13426.

p4raw-id: //depot/perl@29384

diff --git a/lib/Carp/Heavy.pm b/lib/Carp/Heavy.pm
index d5711ce..2caeb27 100644 (file)
--- a/lib/Carp/Heavy.pm
+++ b/lib/Carp/Heavy.pm
@@ -55,7 +55,6 @@ sub  longmess_real {
 
 sub shortmess_real {
     # Icky backwards compatibility wrapper. :-(
-    my $call_pack = caller();
     local @CARP_NOT = caller();
     shortmess_heavy(@_);
 };