loncom/lonr - diff

Return to lonr CVS log

Up to [LON-CAPA] / loncom

version 1.5, 2009/04/18 23:43:47	version 1.7, 2014/10/30 19:09:06
Line 275 sub make_new_child {	Line 275 sub make_new_child {
&status('Accepting connections');	&status('Accepting connections');
my $client = $server->accept() or last;	my $client = $server->accept() or last;
&sync($command);	&sync($command);
# print $command ("display2d:false;simp:true;kill(all);\n");	print $command ("library(phpSerialize);\n");
# &getroutput($command,2);	&getroutput($command);
# &sync($command);	&sync($command);
my $syntaxerr = 0;	my $syntaxerr = 0;
while (my $cmd=<$client>) {	while (my $cmd=<$client>) {
&status('Processing command');	&status('Processing command');
Line 329 sub make_new_child {	Line 329 sub make_new_child {

sub getroutput {	sub getroutput {
my ($command)=@_;	my ($command)=@_;
my $regexp = '>';	my $regexp = '>\s+$';
my $syntaxerr=0;	my $syntaxerr=0;
my $timeout = 20;	my $timeout = 20;
my (undef,$error,$matched,$output) =	my (undef,$error,$matched,$output) =