[svk-commit] r2834 - trunk/t/bm

[nobody at bestpractical.com]

Author: clsung
Date: Thu May  8 04:48:00 2008
New Revision: 2834

Modified:
   trunk/t/bm/remove.t

Log:
- test case for http://task.hm/E9Y7

Modified: trunk/t/bm/remove.t
==============================================================================
--- trunk/t/bm/remove.t	(original)
+++ trunk/t/bm/remove.t	Thu May  8 04:48:00 2008
@@ -1,7 +1,7 @@
 #!/usr/bin/perl -w
 use strict;
 use SVK::Test;
-plan tests => 11;
+plan tests => 13;
 our $output;
 
 my ($xd, $svk) = build_test('test');
@@ -75,4 +75,16 @@
 
 is_output($svk, 'br', ['--remove', 'fake2'],
     ["No such branch exists: fake2 "]);
+
+$svk->branch('--create', 'feature/foobar9');
+chdir('..');
+
+is_output($svk, 'br', ['-l', '//mirror/MyProject'],
+          ['feature/foobar9']);
+
+$svk->branch('--remove', 'feature/foobar9', '//mirror/MyProject');
+
+is_output($svk, 'br', ['-l', '//mirror/MyProject'],
+          []);
+
 1;