add LexEnv plugin, rename $REPL to $_REPL to avoid clash with Lexical::Persistence

[p5sagit/Devel-REPL.git] / lib / Devel / REPL.pm

diff --git a/lib/Devel/REPL.pm b/lib/Devel/REPL.pm
index c52f0bf..b096f9b 100644 (file)
--- a/lib/Devel/REPL.pm
+++ b/lib/Devel/REPL.pm
@@ -51,9 +51,9 @@ sub eval {
 }
 
 sub compile {
-  my $REPL = shift;
-  my $compiled = eval $REPL->wrap_as_sub($_[0]);
-  return (undef, $REPL->error_return("Compile error", $@)) if $@;
+  my $_REPL = shift;
+  my $compiled = eval $_REPL->wrap_as_sub($_[0]);
+  return (undef, $_REPL->error_return("Compile error", $@)) if $@;
   return $compiled;
 }