--- loncom/lonmaxima 2007/11/09 18:54:46 1.36 +++ loncom/lonmaxima 2009/04/17 00:12:14 1.40 @@ -3,7 +3,7 @@ # The LearningOnline Network with CAPA # Connect to MAXIMA CAS # -# $Id: lonmaxima,v 1.36 2007/11/09 18:54:46 albertel Exp $ +# $Id: lonmaxima,v 1.40 2009/04/17 00:12:14 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -270,12 +270,12 @@ sub make_new_child { $command->log_stdout(0); #$command->log_file("$execdir/logs/lonmaxima.session.log"); - &sync($command); for (my $i=0; $i < $MAX_CLIENTS_PER_CHILD; $i++) { &status('Accepting connections'); my $client = $server->accept() or last; - print $command ("display2d:false;kill(all);\n"); + &sync($command); + print $command ("display2d:false;simp:true;kill(all);\n"); &getmaximaoutput($command,2); &sync($command); my $syntaxerr = 0; @@ -356,7 +356,7 @@ sub getmaximaoutput { if ($error) { return 'Error: '.$error; } - $output =~ s/\r+//g; # Remove Windows-style linebreaks + $output =~ s/\r+//gs; # Remove Windows-style linebreaks my $foundoutput=0; my $found_label=0; my $realoutput='';