update perl unit test to remove stasis_log as well as logfile.txt

This commit is contained in:
Sears Russell 2011-09-26 00:47:56 +00:00
parent 6ebc39e54a
commit 402dc71fa0
7 changed files with 8 additions and 8 deletions

View file

@ -26,7 +26,7 @@ sub myprint {
if($ARGV[0] eq "--automated-test") {
shift @ARGV;
system ("rm storefile.txt logfile.txt");
system ("rm -rf storefile.txt logfile.txt stasis_log");
$checking = 1;
}

View file

@ -33,7 +33,7 @@ sub myprint {
if($ARGV[0] eq "--automated-test") {
shift @ARGV;
system ("rm storefile.txt logfile.txt");
system ("rm -rf storefile.txt logfile.txt stasis_log");
$checking = 1;
}
Stasis::Tinit();

View file

@ -20,7 +20,7 @@ sub myprint {
if($ARGV[0] eq "--automated-test") {
shift @ARGV;
system ("rm storefile.txt logfile.txt");
system ("rm -rf storefile.txt logfile.txt stasis_log");
$checking = 1;
}

View file

@ -6,7 +6,7 @@ my $checking;
if(@ARGV && $ARGV[0] eq "--automated-test") {
shift @ARGV;
system ("rm storefile.txt logfile.txt");
system ("rm -rf storefile.txt logfile.txt stasis_log");
$checking = 1;
}
Stasis::Tinit();

View file

@ -6,7 +6,7 @@ my $checking;
if(@ARGV && $ARGV[0] eq "--automated-test") {
shift @ARGV;
system ("rm storefile.txt logfile.txt");
system ("rm -rf storefile.txt logfile.txt stasis_log");
$checking = 1;
}

View file

@ -6,7 +6,7 @@ my $checking;
if(@ARGV && $ARGV[0] eq "--automated-test") {
shift @ARGV;
system ("rm storefile.txt logfile.txt");
system ("rm -rf storefile.txt logfile.txt stasis_log");
$checking = 1;
}

View file

@ -6,7 +6,7 @@ my $checking;
if(@ARGV && $ARGV[0] eq "--automated-test") {
shift @ARGV;
system ("rm storefile.txt logfile.txt");
system ("rm -rf storefile.txt logfile.txt stasis_log");
$checking = 1;
}