Skip to content
Snippets Groups Projects
Commit dd7e32f2 authored by Richard Hartmann's avatar Richard Hartmann
Browse files

Fix tests

parent 8f418036
Branches
Tags
No related merge requests found
......@@ -9,7 +9,7 @@ use Test::Most;
chdir 't' or die $!;
if (!-d 'etc') {
plan skip_all => 'No need to tear previous env.';
plan skip_all => 'No need to tear down previous env.';
}
ok rm_rf 'etc';
......
......@@ -12,21 +12,24 @@ chdir 't/etc/' or die $!;
$ENV{'HOME'} = abs_path ('.vcsh_home');
chdir '.vcsh_home' or die $!;
eval {
touch 'a';
};
die $@ if $@;
system ("./vcsh test1 add 'a'");
system (".././vcsh test1 add 'a'");
my $output = `./vcsh status`;
my $output = `.././vcsh status`;
diag $output;
ok $output eq "test1:
A a
", 'Adding a file worksl';
", 'Adding a file works';
done_testing;
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment