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=cb6f33dfc3e1e27ed6fbce469adc8046138f5c44;hp=752de55660db68b4a9fd7e031e4507a4982130be;hb=dg;hpb=d4f3aabfac0517c43e1b6d610ed2aee5204752ea diff --git a/lib/Eval/WithLexicals.pm b/lib/Eval/WithLexicals.pm index 752de55..cb6f33d 100644 --- a/lib/Eval/WithLexicals.pm +++ b/lib/Eval/WithLexicals.pm @@ -93,7 +93,7 @@ sub _run { %{$self->lexicals}, %{$self->_grab_captures}, }); - @ret; + return $self->context eq 'list' ? @ret : $ret[0]; } sub _grab_captures {