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

nobody at bestpractical.com nobody at bestpractical.com
Mon Apr 28 01:41:35 EDT 2008


Author: clsung
Date: Mon Apr 28 01:41:34 2008
New Revision: 2765

Modified:
   trunk/t/bm/prop-setup.t

Log:
- refine test

Modified: trunk/t/bm/prop-setup.t
==============================================================================
--- trunk/t/bm/prop-setup.t	(original)
+++ trunk/t/bm/prop-setup.t	Mon Apr 28 01:41:34 2008
@@ -2,7 +2,7 @@
 # This test for trunk and/or branches are not in trunk/ and/or branches/ directories
 use strict;
 use SVK::Test;
-plan tests => 5;
+plan tests => 6;
 our $output;
 
 my ($xd, $svk) = build_test('test');
@@ -27,7 +27,7 @@
 
 chdir($copath);
 
-is_output ($svk, 'branch', ['--list', '//mirror/nomeans/A'], ['No project branch founded.']);
+is_output ($svk, 'branch', ['--list', '//mirror/nomeans/A'], ['No project branch found.']);
 TODO: {
 local $TODO = 'Need to implement br --setup ';
 $answer = ['','/A-b',''];
@@ -35,6 +35,7 @@
 is_output ($svk, 'branch', ['--list', '//mirror/nomeans/A'], []);
 
 chdir("A/");
+is_output ($svk, 'branch', ['--list'], []);
 is_output_like ($svk, 'branch', ['--create', 'bar'], qr'Project branch created: bar');
 is_output ($svk, 'branch', ['--list'], ['bar']);
 is_output ($svk, 'list', ['//mirror/nomeans/A-b/bar'],


More information about the svk-commit mailing list