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

Fix tests

parent 8f418036
No related branches found
No related tags found
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