loncom/lond - diff

Return to lond CVS log

Up to [LON-CAPA] / loncom

version 1.81, 2002/05/17 14:03:04	version 1.82, 2002/06/18 19:39:13
Line 1292 sub make_new_child {	Line 1292 sub make_new_child {
# ------------------------------------------------------------------- querysend	# ------------------------------------------------------------------- querysend
} elsif ($userinput =~ /^querysend/) {	} elsif ($userinput =~ /^querysend/) {
my ($cmd,$query,	my ($cmd,$query,
$custom,$customshow)=split(/:/,$userinput);	$arg1,$arg2,$arg3)=split(/\:/,$userinput);
$query=~s/\n*$//g;	$query=~s/\n*$//g;
unless ($custom or $customshow) {	print $client "".
print $client "".
sqlreply("$hostid{$clientip}\&$query")."\n";
}
else {
print $client "".
sqlreply("$hostid{$clientip}\&$query".	sqlreply("$hostid{$clientip}\&$query".
"\&$custom"."\&$customshow")."\n";	"\&$arg1"."\&$arg2"."\&$arg3")."\n";
}
# ------------------------------------------------------------------ queryreply	# ------------------------------------------------------------------ queryreply
} elsif ($userinput =~ /^queryreply/) {	} elsif ($userinput =~ /^queryreply/) {
my ($cmd,$id,$reply)=split(/:/,$userinput);	my ($cmd,$id,$reply)=split(/:/,$userinput);