[Bps-public-commit] r15655 - in sd/trunk: .

[sartak at bestpractical.com]

Author: sartak
Date: Fri Aug 29 18:44:58 2008
New Revision: 15655

Modified:
   sd/trunk/   (props changed)
   sd/trunk/lib/App/SD/CLI/Command.pm

Log:
 r70714 at onn:  sartak | 2008-08-29 18:44:49 -0400
 If a test subscript tries to invoke an editor, then throw an error instead of silently hanging forever


Modified: sd/trunk/lib/App/SD/CLI/Command.pm
==============================================================================
--- sd/trunk/lib/App/SD/CLI/Command.pm	(original)
+++ sd/trunk/lib/App/SD/CLI/Command.pm	Fri Aug 29 18:44:58 2008
@@ -54,6 +54,8 @@
         # user aborted their text editor without changing anything; signify
         # this to the caller by returning nothing
         $content = '' if $content eq $text;
+    } elsif ($ENV{IN_PROPHET_TEST_COMMAND}) {
+        die "Tried to invoke an editor in a test script!";
     } else {
         print "Please type your $args{type} and press ctrl-d.\n";
         $content = do { local $/; <> };