[prev in list] [next in list] [prev in thread] [next in thread]
List: svk-commit
Subject: [svk-commit] r2567 - branches/bm/t/bm
From: nobody () bestpractical ! com
Date: 2007-10-26 8:37:22
Message-ID: 20071026083722.5F3144D82CD () diesel ! bestpractical ! com
[Download RAW message or body]
Author: clsung
Date: Fri Oct 26 04:33:48 2007
New Revision: 2567
Modified:
branches/bm/t/bm/move.t
Log:
- add test if dst is a directory
Modified: branches/bm/t/bm/move.t
==============================================================================
--- branches/bm/t/bm/move.t (original)
+++ branches/bm/t/bm/move.t Fri Oct 26 04:33:48 2007
@@ -1,6 +1,6 @@
#!/usr/bin/perl -w
use strict;
-use Test::More tests => 3;
+use Test::More tests => 4;
use SVK::Test;
use File::Path;
@@ -23,5 +23,7 @@
is_output_like ($svk, 'branch', ['--create', 'feature/foo'], qr'Project branch created: feature/foo');
is_output_like ($svk, 'branch', ['--list'], qr'feature/foo');
-$svk->br('--move', 'feature/foo', 'release-ready/foo');
-is_output_like ($svk, 'branch', ['--list'], qr'release-ready/foo');
+$svk->br('--move', 'feature/foo', 'release-ready/bar');
+is_output_like ($svk, 'branch', ['--list'], qr'release-ready/bar');
+$svk->br('--move', 'release-ready/bar', 'feature/');
+is_output_like ($svk, 'branch', ['--list'], qr'feature/bar');
_______________________________________________
svk-commit mailing list
svk-commit@bestpractical.com
http://lists.bestpractical.com/cgi-bin/mailman/listinfo/svk-commit
[prev in list] [next in list] [prev in thread] [next in thread]
Configure |
About |
News |
Add a list |
Sponsored by KoreLogic