From 08ec0d4c0a2ef14d0e7ca78dd5a0b54dcade1132 Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Wed, 29 May 2013 05:07:33 -0500
Subject: clean up line reading a bit

---
 lib/App/REPL/Plugin/Defaults.pm | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

(limited to 'lib/App/REPL/Plugin/Defaults.pm')

diff --git a/lib/App/REPL/Plugin/Defaults.pm b/lib/App/REPL/Plugin/Defaults.pm
index 057fcce..23368e8 100644
--- a/lib/App/REPL/Plugin/Defaults.pm
+++ b/lib/App/REPL/Plugin/Defaults.pm
@@ -15,15 +15,13 @@ use base 'App::REPL::Plugin';
 
 use Eval::Closure;
 
-sub display_prompt {
-    my $self = shift;
-
-    print "> ";
-}
+sub prompt { "> " }
 
 sub read_line {
     my $self = shift;
+    my ($next, $prompt) = @_;
 
+    print $prompt;
     return scalar <>;
 }
 
-- 
cgit v1.2.3-54-g00ecf