loncom/lond - diff

Return to lond CVS log

Up to [LON-CAPA] / loncom

version 1.39, 2001/03/22 15:06:01	version 1.40, 2001/03/22 15:14:42
Line 967 sub make_new_child {	Line 967 sub make_new_child {
} elsif ($userinput =~ /^querysend/) {	} elsif ($userinput =~ /^querysend/) {
my ($cmd,$query,$custom)=split(/:/,$userinput);	my ($cmd,$query,$custom)=split(/:/,$userinput);
$query=~s/\n*$//g;	$query=~s/\n*$//g;
print $client sqlreply("$hostid{$clientip}\&$query").	unless ($custom) {
"\n";	print $client "".
	sqlreply("$hostid{$clientip}\&$query")."\n";
	}
	else {
	print $client "".
	sqlreply("$hostid{$clientip}\&$query".
	"\&$custom")."\n";
	}
# ------------------------------------------------------------------ queryreply	# ------------------------------------------------------------------ queryreply
} elsif ($userinput =~ /^queryreply/) {	} elsif ($userinput =~ /^queryreply/) {
my ($cmd,$id,$reply)=split(/:/,$userinput);	my ($cmd,$id,$reply)=split(/:/,$userinput);