New (from http://rt.cpan.org/Public/Bug/Display.html?id=38892)

Hook-LexWrap-0.20-cpan-rt-38892.diff

@@ -0,0 +1,14 @@
+Address http://rt.cpan.org/Public/Bug/Display.html?id=38892
+
+diff -Naur Hook-LexWrap-0.20.orig/lib/Hook/LexWrap.pm Hook-LexWrap-0.20/lib/Hook/LexWrap.pm
+--- Hook-LexWrap-0.20.orig/lib/Hook/LexWrap.pm	2001-10-01 08:51:03.000000000 +0200
++++ Hook-LexWrap-0.20/lib/Hook/LexWrap.pm	2008-10-05 06:14:41.000000000 +0200
+@@ -3,7 +3,7 @@
+ use 5.006;
+ use Carp;
+ 
+-*CORE::GLOBAL::caller = sub {
++*CORE::GLOBAL::caller = sub(;$) {
+ 	my ($height) = ($_[0]||0);
+ 	my $i=1;
+ 	my $name_cache;