--- loncom/lonmaxima 2006/05/10 01:08:01 1.18 +++ loncom/lonmaxima 2006/05/10 02:12:17 1.19 @@ -3,7 +3,7 @@ # The LearningOnline Network with CAPA # Connect to MAXIMA CAS # -# $Id: lonmaxima,v 1.18 2006/05/10 01:08:01 www Exp $ +# $Id: lonmaxima,v 1.19 2006/05/10 02:12:17 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -255,10 +255,9 @@ sub make_new_child { &status('Accepting connections'); my $client = $server->accept() or last; print $command "kill(all);reset();\n"; - &getmaximaoutput($command); + &sync($command); while (my $cmd=<$client>) { &status('Processing command'); - &sync($command); print $command &unescape($cmd); my $reply=&getmaximaoutput($command); print $client &escape($reply)."\n"; @@ -267,7 +266,8 @@ sub make_new_child { $client->close(); $command->hard_close(); exit; - } + } + &sync($command); &status('Waiting for commands'); } }