--- loncom/interface/printout.pl 2004/07/28 22:00:14 1.59 +++ loncom/interface/printout.pl 2004/07/29 19:45:41 1.60 @@ -1,7 +1,7 @@ #!/usr/bin/perl # CGI-script to run LaTeX, dvips, ps2ps, ps2pdf etc. # -# $Id: printout.pl,v 1.59 2004/07/28 22:00:14 albertel Exp $ +# $Id: printout.pl,v 1.60 2004/07/29 19:45:41 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -403,7 +403,9 @@ sub busy_wait_command { $SIG{CHLD} = \&REAPER; $done=0; my $pid=open(CMD,"$command |"); - &Apache::lonhtmlcommon::Update_PrgWin('',$progress_win,$message); + if ($adv) { + &Apache::lonhtmlcommon::Update_PrgWin('',$progress_win,$message); + } while(!$done) { sleep 1; my $extra_msg; @@ -411,8 +413,10 @@ sub busy_wait_command { my $size=(stat($output_file))[7]; $extra_msg=", $size bytes generated"; } - &Apache::lonhtmlcommon::Update_PrgWin('',$progress_win, - $message.$extra_msg); + if ($adv) { + &Apache::lonhtmlcommon::Update_PrgWin('',$progress_win, + $message.$extra_msg); + } } $SIG{CHLD}='IGNORE'; close(CMD);