X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDevel%2FREPL.pm;h=ff461f551ee0b437c47ec3894c79d1e7cee0f874;hb=f254750a4425f47eca1923f7e44b3b53b3c71104;hp=89c3a8b55cb9aad4ee57ba6f3831cedf5e75201a;hpb=911a1c242561b001192b9541b3aa813fe0b70b41;p=p5sagit%2FDevel-REPL.git

diff --git a/lib/Devel/REPL.pm b/lib/Devel/REPL.pm
index 89c3a8b..ff461f5 100644
--- a/lib/Devel/REPL.pm
+++ b/lib/Devel/REPL.pm
@@ -68,9 +68,9 @@ sub mangle_line {
 }
 
 sub execute {
-  my ($self, $to_exec, @args) = @_;
-  my @ret = eval { $to_exec->(@args) };
-  return $self->error_return("Runtime error", $@) if $@;
+  my $REPL = shift;
+  my @ret = eval { shift->(@_) };
+  return $REPL->error_return("Runtime error", $@) if $@;
   return @ret;
 }