loncom/lonsql - diff

Return to lonsql CVS log

Up to [LON-CAPA] / loncom

version 1.22, 2001/03/27 18:34:03	version 1.23, 2001/03/27 18:38:59
Line 249 sub make_new_child {	Line 249 sub make_new_child {
if ($custom) {	if ($custom) {
&logthis("am going to do custom query for $custom");	&logthis("am going to do custom query for $custom");
if (@files) {	if (@files) {
@metalist=map {$perlvar{'lonDocRoot'}.$_.'meta'} @files;	@metalist=map {$perlvar{'lonDocRoot'}.$_.'.meta'} @files;
}	}
else {	else {
@metalist=(); pop @metalist;	@metalist=(); pop @metalist;
&find("$perlvar{'lonDocRoot'}/res");	&find("$perlvar{'lonDocRoot'}/res");
}	}
&logthis("FILELIST:" . join(":::",@metalist));	# &logthis("FILELIST:" . join(":::",@metalist));
# if file is indicated in sql database and	# if file is indicated in sql database and
# not part of sql-relevant query, do not pattern match.	# not part of sql-relevant query, do not pattern match.
# if file is not in sql database, output error.	# if file is not in sql database, output error.