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

[nobody at bestpractical.com]

Author: clsung
Date: Wed Feb 27 09:12:50 2008
New Revision: 2703

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

Log:
- die if invalide --from argument

Modified: trunk/lib/SVK/Command/Branch.pm
==============================================================================
--- trunk/lib/SVK/Command/Branch.pm	(original)
+++ trunk/lib/SVK/Command/Branch.pm	Wed Feb 27 09:12:50 2008
@@ -189,6 +189,8 @@
 	'/'.$branch_path.'/';
 
     my $src = $self->arg_uri_maybe($src_path);
+    die loc("Invalid --from argument") if
+	$SVN::Node::none == $src->root->check_path($src->path);
     my $dst = $self->arg_uri_maybe($newbranch_path);
     $SVN::Node::none == $dst->root->check_path($dst->path)
 	or die loc("Project branch already exists: %1 %2\n",