[Bps-public-commit] r16150 - in Prophet/branches/dispatcher: lib/Prophet

[sartak at bestpractical.com]

Author: sartak
Date: Mon Sep 29 13:50:38 2008
New Revision: 16150

Modified:
   Prophet/branches/dispatcher/   (props changed)
   Prophet/branches/dispatcher/lib/Prophet/Test.pm

Log:
 r73242 at onn:  sartak | 2008-09-29 13:50:26 -0400
 Fixes to make sure we set the custom editor for testing


Modified: Prophet/branches/dispatcher/lib/Prophet/Test.pm
==============================================================================
--- Prophet/branches/dispatcher/lib/Prophet/Test.pm	(original)
+++ Prophet/branches/dispatcher/lib/Prophet/Test.pm	Mon Sep 29 13:50:38 2008
@@ -24,7 +24,7 @@
 our $EDIT_TEXT = sub { shift };
 do {
     no warnings 'redefine';
-    *Prophet::CLI::Command::edit_text = sub {
+    *Prophet::CLI::edit_text = sub {
         my $self = shift;
         $EDIT_TEXT->(@_);
     };
@@ -383,6 +383,9 @@
 
 sub run_command {
     my $output = '';
+
+    local $ENV{IN_PROPHET_TEST_COMMAND} = 1;
+
     open my $handle, '>', \$output;
     Prophet::CLI->new->invoke($handle, @_);
     return $output;