vcsh: Fix foreach()

[code/vcsh.git] / t / 300-add.t

diff --git a/t/300-add.t b/t/300-add.t
index f16f6e1b7e2712c70bee5b85ec0a790be33e9474..24d9a8ae8742f9ae37204fcadccbe430bbbeb601 100644 (file)
--- a/t/300-add.t
+++ b/t/300-add.t
@@ -12,21 +12,22 @@ chdir 't/etc/' or die $!;
 
 $ENV{'HOME'} = abs_path ('.vcsh_home');
 
 
 $ENV{'HOME'} = abs_path ('.vcsh_home');
 

+chdir '.vcsh_home' or die $!;
+

 eval {
        touch 'a';
 };
 
 die $@ if $@;
 
 eval {
        touch 'a';
 };
 
 die $@ if $@;
 

-system ("./vcsh -d test1 add 'a'");
-
-my $output = `./vcsh status`;
+system (".././vcsh test1 add 'a'");

 
 

-diag $output;
+my $output = `.././vcsh status`;

 
 ok $output eq "test1:
 
 ok $output eq "test1:

-A a
-", 'Adding a file worksl';
+A  a
+
+", 'Adding a file works';

 
 done_testing;
 
 
 done_testing;