X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FImport-Into.git;a=blobdiff_plain;f=lib%2FImport%2FInto.pm;fp=lib%2FImport%2FInto.pm;h=74b7358d9093c688b80beb9bb8d2c62745580e21;hp=6e8c341fc164d1d221cff91986f7395d54404e9b;hb=995d8262bd1c7cc306aee068943efa7d205605c0;hpb=ba1c5bf061f228d68ebd7b1581563e95df212e8b diff --git a/lib/Import/Into.pm b/lib/Import/Into.pm index 6e8c341..74b7358 100644 --- a/lib/Import/Into.pm +++ b/lib/Import/Into.pm @@ -151,7 +151,7 @@ Old Comments (Not!)> in the eval, which will change what C reports for the filename when called in the importer. The filename and line number to use in the directive then need to be fetched using C: - my ($terget, $file, $line) = caller(1); + my ($target, $file, $line) = caller(1); my $sub = eval qq{ package $target; #line $line "$file"