summaryrefslogtreecommitdiff
path: root/bin/run_all_win32.pl
diff options
context:
space:
mode:
authornanbor <nanbor@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>1999-07-29 23:34:43 +0000
committernanbor <nanbor@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>1999-07-29 23:34:43 +0000
commitcbcaa9028d1033807ce74909261c056ee503d054 (patch)
tree71f7b25db223f1e83a9d94bf2aee472757828de5 /bin/run_all_win32.pl
parent5bcde818a1fe6c6174f2fba80e83df937a8d0675 (diff)
downloadATCD-cbcaa9028d1033807ce74909261c056ee503d054.tar.gz
Untabified
Diffstat (limited to 'bin/run_all_win32.pl')
-rwxr-xr-xbin/run_all_win32.pl20
1 files changed, 10 insertions, 10 deletions
diff --git a/bin/run_all_win32.pl b/bin/run_all_win32.pl
index 0825900008c..84021c3a8d9 100755
--- a/bin/run_all_win32.pl
+++ b/bin/run_all_win32.pl
@@ -132,9 +132,9 @@ foreach $i (@RUN_LIST) {
print LOG "$CMD: =============================================\n";
print LOG "$CMD: running $program in $directory at ", $date, "\n";
local $subdir =
- $ENV{ACE_ROOT} . '/'. $directory;
+ $ENV{ACE_ROOT} . '/'. $directory;
chdir ($subdir)
- || mydie "cannot chdir to $subdir";
+ || mydie "cannot chdir to $subdir";
$run_error = 0;
@@ -143,21 +143,21 @@ foreach $i (@RUN_LIST) {
open (RUN, "$exe_log_name") || push @failures, "Can't open execution log file $exe_log_name\n";
while (<RUN>) {
- print LOG $_;
- if (m/^Error/ || m/FAILED/ || m/EXCEPTION/) {
- $run_error = 1;
- }
+ print LOG $_;
+ if (m/^Error/ || m/FAILED/ || m/EXCEPTION/) {
+ $run_error = 1;
+ }
}
if (close(RUN) == 0) {
- push @failures, "Error when closing log file $program in $directory";
- next;
+ push @failures, "Error when closing log file $program in $directory";
+ next;
}
$date = localtime;
print LOG "$CMD: $program finished ", $date, "\n";
if ($run_error != 0) {
- push @failures,
- "errors detected while running $program in $directory";
+ push @failures,
+ "errors detected while running $program in $directory";
}
unlink ("$exe_log_name");