Kaydet (Commit) db3aaa31 authored tarafından Stephan Bergmann's avatar Stephan Bergmann

Print log file in case of error

...so that tinderbox output becomes useful.
üst 6656ddb2
......@@ -91,7 +91,11 @@ sub exit_program
installer::files::save_file($installer::globals::logfilename ,\@installer::globals::globallogfileinfo);
}
installer::logger::print_error("$message\nin function: $function");
installer::logger::print_error("Saved logfile: $installer::globals::logfilename\n");
print("ERROR, saved logfile $installer::globals::logfilename is:\n");
open(LOG, "<", $installer::globals::logfilename);
print ": $_" while (<LOG>);
print "\n";
close(LOG);
# Saving the debug info
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment