Commit ff85c01e authored by Leigh B. Stoller's avatar Leigh B. Stoller
Browse files

Turn off line buffering for the sake of the web page which is

using a popen now.
parent fdf26c3a
......@@ -7,6 +7,21 @@ use English;
#
my $debug = 1;
#
# Turn off line buffering on output
#
$| = 1;
#
# We need to protect this from signals. 1st argument is signal name
#
sub sighandler {
my($sig) = @_;
print "Caught a SIG$sig--shutting down\n";
tbendit();
fatal();
}
#
# This gets invoked from the Web interface. CD into the proper directory
# and do the tb stuff.
......
......@@ -16,6 +16,11 @@ my $tbdata = "tbdata";
$ENV{'PATH'} = '/bin:/usr/bin';
delete @ENV{'IFS', 'CDPATH', 'ENV', 'BASH_ENV'};
#
# Turn off line buffering on output
#
$| = 1;
#
# Check args.
#
......
Supports Markdown
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