loncom/lonsql - diff

Return to lonsql CVS log

Up to [LON-CAPA] / loncom

version 1.16, 2001/03/26 20:38:12	version 1.17, 2001/03/26 20:43:04
Line 234 sub make_new_child {	Line 234 sub make_new_child {
else {	else {
my $r1=$sth->fetchall_arrayref;	my $r1=$sth->fetchall_arrayref;
my @r2; map {my $a=$_; my @b=map {escape($_)} @$a; push @r2,join(",", @b)} (@$r1);	my @r2; map {my $a=$_; my @b=map {escape($_)} @$a; push @r2,join(",", @b)} (@$r1);
$result=join("&",@r2) . "\n";	$result=join("&",@r2);
}	}

# do custom metadata searching here and build into result	# do custom metadata searching here and build into result
Line 258 sub make_new_child {	Line 258 sub make_new_child {
}	}
$customresult.='&custom='.escape($stuff);	$customresult.='&custom='.escape($stuff);
}	}
# $result.=$customresult;	$result.=$customresult;
}	}
# reply with result	# reply with result
$result.="ABCABC";	$result.="\n" if $result;
&reply("queryreply:$queryid:ABC${result}DEF",$conserver);	&reply("queryreply:$queryid:$result",$conserver);

}	}