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;