X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FDevel-REPL.git;a=blobdiff_plain;f=lib%2FDevel%2FREPL%2FPlugin%2FLexEnv.pm;fp=lib%2FDevel%2FREPL%2FPlugin%2FLexEnv.pm;h=ea6d26b3d18983645d86af6f2067572845fe5b84;hp=fd91a91eae527760faa362ec01acf3beb093ada3;hb=b314b3ec66e440dbe04fc108403a062ab22084e6;hpb=bd67131f89dd3b141458a20e3b456f23d6f62ee0

diff --git a/lib/Devel/REPL/Plugin/LexEnv.pm b/lib/Devel/REPL/Plugin/LexEnv.pm
index fd91a91..ea6d26b 100644
--- a/lib/Devel/REPL/Plugin/LexEnv.pm
+++ b/lib/Devel/REPL/Plugin/LexEnv.pm
@@ -47,8 +47,10 @@ around 'execute' => sub {
 around 'find_variable' => sub {
   my $orig = shift;
   my ($self, $name) = @_;
-  my $variable = $self->lexical_environment->get_context('_')->{$name};
-  return \$variable if $variable;
+
+  return \( $self->lexical_environment->get_context('_')->{$name} )
+    if exists $self->lexical_environment->get_context('_')->{$name};
+
   return $orig->(@_);
 };