[svk-commit] r2813 - trunk/lib/SVK/Command

[nobody at bestpractical.com]

Author: clsung
Date: Tue May  6 22:17:44 2008
New Revision: 2813

Modified:
   trunk/lib/SVK/Command/Branch.pm

Log:
- fix error when no project_path specified.

Modified: trunk/lib/SVK/Command/Branch.pm
==============================================================================
--- trunk/lib/SVK/Command/Branch.pm	(original)
+++ trunk/lib/SVK/Command/Branch.pm	Tue May  6 22:17:44 2008
@@ -328,9 +328,9 @@
 	    if is_uri ($_);
     }
 
-    my $project_path = pop @arg if $#arg > 0;
     # if specified project path at the end
-    $project_path = '' unless is_depotpath($project_path);
+    my $project_path = pop @arg if $#arg > 0 and is_depotpath($arg[$#arg]);
+    $project_path = '' unless $project_path;
     return ($self->arg_co_maybe ($project_path), @arg);
 }