[svk-commit] r2839 - trunk/t/bm
nobody at bestpractical.com
nobody at bestpractical.com
Thu May 8 10:57:53 EDT 2008
Author: clsung
Date: Thu May 8 10:57:33 2008
New Revision: 2839
Modified:
trunk/t/bm/online-offline.t
Log:
- add tests for preserving commit messages between --online/--offline
- ref: http://task.hm/ECMV
Modified: trunk/t/bm/online-offline.t
==============================================================================
--- trunk/t/bm/online-offline.t (original)
+++ trunk/t/bm/online-offline.t Thu May 8 10:57:33 2008
@@ -1,7 +1,7 @@
#!/usr/bin/perl -w
use strict;
use SVK::Test;
-plan tests => 14;
+plan tests => 16;
our $output;
my ($xd, $svk) = build_test('test');
@@ -67,12 +67,15 @@
qr|Depot Path: //local/MyProject/feature/foobar|);
append_file ('B/S/Q/qu', "\nappend CBA on local branch feature/foobar\n");
-$svk->commit ('-m', 'commit message','');
+$svk->commit ('-m', 'commit message on local branch','');
# now should do smerge first, then sw to the branch
is_output_like ($svk, 'branch', ['--online'],
qr|U B/S/Q/qu|);
+is_output_like ($svk, 'log', [],
+ qr|commit message on local branch|);
+
is_output_like ($svk, 'info', [],
qr|Depot Path: //mirror/MyProject/branches/feature/foobar|);
@@ -86,3 +89,7 @@
is_output_like ($svk, 'branch', ['--offline'],
qr|U A/Q/qz\nD A/Q/qu|);
+
+is_output_like ($svk, 'log', [],
+ qr|- changes in remote|);
+
More information about the svk-commit
mailing list