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

[nobody at bestpractical.com]

Author: clsung
Date: Sat Aug  2 08:31:34 2008
New Revision: 3050

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

Log:
- as_foreign('Unix') again

Modified: trunk/lib/SVK/Command/Branch.pm
==============================================================================
--- trunk/lib/SVK/Command/Branch.pm	(original)
+++ trunk/lib/SVK/Command/Branch.pm	Sat Aug  2 08:31:34 2008
@@ -300,7 +300,7 @@
 		path     => $proj->trunk
 	    }
 	);
-        my $lb = $trunk->mclone( path => $target->_to_pclass($proj->local_root) );
+        my $lb = $trunk->mclone( path => $target->_to_pclass($proj->local_root)->as_foreign('Unix') );
 	die loc("The local project root %1 is a branch itself.\n".
 	     "Please rename the directory and try again\n", $proj->local_root) if $lb->related_to($trunk);
     }