show commands when no args given

c9s · Dec 19, 2010 · c45784a · c45784a
1 parent 7895f96
commit c45784a
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/bin/po b/bin/po
@@ -11,4 +11,6 @@ use App::I18N::Command::Update;
 
 my $cmd = shift @ARGV;
 my @args = @ARGV;
-App::I18N::Command->invoke( $cmd , @args );
+
+$cmd ? App::I18N::Command->invoke( $cmd , @args )
+     : App::I18N::Command->invoke('help');