X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FEval-WithLexicals.git;a=blobdiff_plain;f=lib%2FEval%2FWithLexicals.pm;h=c7b5fcaf71168a02e29814f713b32f3759a65b1f;hp=6571291c008c6c5c5992fadf0c576b26e6ce8769;hb=e764ce9b0e0a0dbb3b51ecab734b0a6bf111b6c8;hpb=4a3d69ab3eeaa2c4383a988cf6cbf3f0c7fe6073 diff --git a/lib/Eval/WithLexicals.pm b/lib/Eval/WithLexicals.pm index 6571291..c7b5fca 100644 --- a/lib/Eval/WithLexicals.pm +++ b/lib/Eval/WithLexicals.pm @@ -36,6 +36,7 @@ sub eval { ${setup} sub Eval::WithLexicals::Cage::current_line { package ${package}; +#line 1 "(eval)" ${to_eval} ;sub Eval::WithLexicals::Cage::pad_capture { } BEGIN { Eval::WithLexicals::Util::capture_list() }