[Bps-public-commit] r15413 - Prophet/trunk/lib/Prophet

[jesse at bestpractical.com]

Author: jesse
Date: Sun Aug 24 13:16:14 2008
New Revision: 15413

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

Log:
* kill the type in between run-one-command invocations

Modified: Prophet/trunk/lib/Prophet/CLI.pm
==============================================================================
--- Prophet/trunk/lib/Prophet/CLI.pm	(original)
+++ Prophet/trunk/lib/Prophet/CLI.pm	Sun Aug 24 13:16:14 2008
@@ -357,13 +357,19 @@
 
 Example:
 
-my $cli = Prophet::CLI->new({ app_class => 'App::SD' });
+ my $cli = Prophet::CLI->new({ app_class => 'App::SD' });
 $cli->run_one_command;
 
 =cut
 
 sub run_one_command {
     my $self = shift;
+	{ #  really, we shouldn't be doing this stuff from the command dispatcher
+	    $self->type('');
+	    $self->clear_args();
+	    $self->clear_props();
+	}
+
     $self->parse_args();
     $self->set_type_and_uuid();
     if ( my $cmd_obj = $self->_get_cmd_obj() ) {