[Bps-public-commit] r17387 - Prophet/trunk/lib/Prophet/CLI/Command

[jesse at bestpractical.com]

Author: jesse
Date: Sat Dec 27 16:26:07 2008
New Revision: 17387

Modified:
   Prophet/trunk/lib/Prophet/CLI/Command/Shell.pm

Log:
* remove some unneccesary moosing

Modified: Prophet/trunk/lib/Prophet/CLI/Command/Shell.pm
==============================================================================
--- Prophet/trunk/lib/Prophet/CLI/Command/Shell.pm	(original)
+++ Prophet/trunk/lib/Prophet/CLI/Command/Shell.pm	Sat Dec 27 16:26:07 2008
@@ -56,7 +56,7 @@
     warn $@ if $@;
 }
 
-sub run {
+sub _run {
     my $self = shift;
 
     local $| = 1;
@@ -75,11 +75,10 @@
 }
 
 # make the REPL history persistent
-around run => sub {
-    my $orig = shift;
+sub run{
     my $self = shift;
     $self->_read_repl_history();
-    $self->$orig(@_);
+    $self->_run(@_);
     $self->_write_repl_history();
 };