[Bps-public-commit] r17051 - in Prophet/branches/actions: .

[jesse at bestpractical.com]

Author: jesse
Date: Fri Nov 28 22:27:58 2008
New Revision: 17051

Modified:
   Prophet/branches/actions/   (props changed)
   Prophet/branches/actions/lib/Prophet/CLI/Command.pm

Log:
 r53545 at 31b (orig r17050):  spang | 2008-11-28 15:19:18 -0500
  r52812 at loki:  spang | 2008-11-28 15:13:56 -0500
  bugfix: <> doesn't work in this case because we're calling sd with arguments,
  and thus <> tries to open files with the names of those arguments and is
  sad.
 


Modified: Prophet/branches/actions/lib/Prophet/CLI/Command.pm
==============================================================================
--- Prophet/branches/actions/lib/Prophet/CLI/Command.pm	(original)
+++ Prophet/branches/actions/lib/Prophet/CLI/Command.pm	Fri Nov 28 22:27:58 2008
@@ -174,8 +174,8 @@
 
 =head2 prompt_Yn question
 
-Asks user the question and returns true if answer was positive or false otherwise.
-Default answer is 'Yes'.
+Asks user the question and returns true if answer was positive or false
+otherwise. Default answer is 'Yes' (returns true).
 
 =cut
 
@@ -184,7 +184,7 @@
     my $msg = shift;
     print "$msg [Y/n]: ";
 
-    my $a = <>;
+    my $a = <STDIN>;
     chomp $a;
 
     return 1 if $a =~ /^(|y|yes)$/i;