[svk-commit] r2263 - branches/2.0-releng/t
nobody at bestpractical.com
nobody at bestpractical.com
Sun Dec 24 10:09:08 EST 2006
Author: clkao
Date: Sun Dec 24 10:09:07 2006
New Revision: 2263
Modified:
branches/2.0-releng/t/33prop.t
branches/2.0-releng/t/77floating.t
Log:
More win32 path issues in tests.
Modified: branches/2.0-releng/t/33prop.t
==============================================================================
--- branches/2.0-releng/t/33prop.t (original)
+++ branches/2.0-releng/t/33prop.t Sun Dec 24 10:09:07 2006
@@ -59,7 +59,7 @@
is_output ($svk, 'pg', ['myprop', "$copath/A"],
['myvalue']);
is_output ($svk, 'pg', [-R => 'myprop', "$copath"],
- ['t/checkout/prop/A - myvalue']);
+ [__('t/checkout/prop/A - myvalue')]);
$svk->commit ('-m', 'commit', $copath);
Modified: branches/2.0-releng/t/77floating.t
==============================================================================
--- branches/2.0-releng/t/77floating.t (original)
+++ branches/2.0-releng/t/77floating.t Sun Dec 24 10:09:07 2006
@@ -35,9 +35,8 @@
my $loaded = LoadFile("$copath/.svk/config");
ok(ref($loaded->{checkout}) eq "Data::Hierarchy::Relative",
'stored config is relative');
-my $checkout = $loaded->{checkout}->to_absolute('/nowhere');
-ok(exists $checkout->get("/nowhere/A/foo")->{revision}, 'relative lookup');
-
+my $checkout = $loaded->{checkout}->to_absolute(Path::Class::Dir->new('/nowhere'));
+ok(exists $checkout->get(Path::Class::Dir->new("/nowhere/A/foo"))->{revision}, 'relative lookup');
my ($copath2, $corpath2) = get_copath ('floating2');
rename ($corpath, $corpath2);
($xd, $svk) = build_floating_test($corpath2);
More information about the svk-commit
mailing list