version 1.105, 2006/06/26 10:11:48
|
version 1.107, 2006/06/30 01:24:41
|
Line 700 sub busy_wait_command {
|
Line 700 sub busy_wait_command {
|
|
|
$SIG{CHLD} = \&REAPER; |
$SIG{CHLD} = \&REAPER; |
$done=0; |
$done=0; |
print("<p> Doing : <tt>$command</tt>"); |
|
my $pid=open(CMD,"$command |"); |
my $pid=open(CMD,"$command |"); |
if ($advanced_role) { |
if ($advanced_role) { |
&Apache::lonhtmlcommon::Update_PrgWin('',$progress_win,$message); |
&Apache::lonhtmlcommon::Update_PrgWin('',$progress_win,$message); |
Line 720 sub busy_wait_command {
|
Line 719 sub busy_wait_command {
|
$SIG{CHLD}='IGNORE'; |
$SIG{CHLD}='IGNORE'; |
close(CMD); |
close(CMD); |
} |
} |
print("<p> End</p>"); |
|
|
|
# Repagninate |
# Repagninate |
# What we need to do: |
# What we need to do: |
Line 832 sub repaginate {
|
Line 830 sub repaginate {
|
my $addlines = $max_pages - $pages_in_student[$student_number]; |
my $addlines = $max_pages - $pages_in_student[$student_number]; |
&Apache::lonnet::logthis("student: $pages_in_student[$student_number] add: $addlines"); |
&Apache::lonnet::logthis("student: $pages_in_student[$student_number] add: $addlines"); |
while($addlines) { |
while($addlines) { |
print LATEXOUT '\linebreak This page left intentionally blank \pagebreak'; |
print LATEXOUT '\linebreak \strut \pagebreak'; |
|
|
$addlines--; |
$addlines--; |
} |
} |