version 1.41, 2012/02/16 19:54:06
|
version 1.42, 2013/07/04 11:44:44
|
Line 259 sub make_new_child {
|
Line 259 sub make_new_child {
|
|
|
&logthis('New process started'); |
&logthis('New process started'); |
|
|
my $command=Expect->spawn('maxima'); |
my $command = new Expect(); |
|
$command->log_stdout(0); |
|
#$command->log_file("$execdir/logs/lonmaxima.session.log"); |
|
$command->spawn('maxima'); |
|
&getmaximaoutput($command, 2); # wait for maxima to finish initialization |
# soft/hard_close can take awhile and we really |
# soft/hard_close can take awhile and we really |
# don't care we just want it gone |
# don't care we just want it gone |
$SIG{INT} = sub { |
$SIG{INT} = sub { |
Line 268 sub make_new_child {
|
Line 272 sub make_new_child {
|
exit; |
exit; |
}; |
}; |
|
|
$command->log_stdout(0); |
|
#$command->log_file("$execdir/logs/lonmaxima.session.log"); |
|
|
|
for (my $i=0; $i < $MAX_CLIENTS_PER_CHILD; $i++) { |
for (my $i=0; $i < $MAX_CLIENTS_PER_CHILD; $i++) { |
&status('Accepting connections'); |
&status('Accepting connections'); |