loncom/lonmaxima - diff

Return to lonmaxima CVS log

Up to [LON-CAPA] / loncom

version 1.29, 2007/05/26 16:00:30	version 1.30, 2007/06/12 23:48:45
Line 237 sub make_new_child {	Line 237 sub make_new_child {
return;	return;
} else {	} else {
# Child can not return from this subroutine.	# Child can not return from this subroutine.
$SIG{INT} = 'DEFAULT'; # make SIGINT kill us as it did before

# unblock signals	# unblock signals
sigprocmask(SIG_UNBLOCK, $sigset)	sigprocmask(SIG_UNBLOCK, $sigset)
Line 246 sub make_new_child {	Line 246 sub make_new_child {
&logthis('New process started');	&logthis('New process started');

my $command=Expect->spawn('maxima');	my $command=Expect->spawn('maxima');
$command->log_stdout(0);	# soft/hard_close can take awhile and we really
	# don't care we just want it gone
	$SIG{INT} = sub {
	my $pid = $command->pid();
	kill('KILL'=>$pid);
	exit;
	};

	$command->log_stdout(0);
#$command->log_file("$execdir/logs/lonmaxima.session.log");	#$command->log_file("$execdir/logs/lonmaxima.session.log");
&getmaximaoutput($command);	&getmaximaoutput($command);