[LON-CAPA-cvs] cvs: loncom /interface lonsearchcat.pm
matthew
lon-capa-cvs@mail.lon-capa.org
Mon, 10 May 2004 13:06:29 -0000
matthew Mon May 10 09:06:29 2004 EDT
Modified files:
/loncom/interface lonsearchcat.pm
Log:
Removed debugging code.
&parse_advanced_search: now spell "SELECT" properly.
&detailed_citation_view: now use 'sequsage_list' instead of 'usage_list'.
Index: loncom/interface/lonsearchcat.pm
diff -u loncom/interface/lonsearchcat.pm:1.225 loncom/interface/lonsearchcat.pm:1.226
--- loncom/interface/lonsearchcat.pm:1.225 Sun May 9 18:55:17 2004
+++ loncom/interface/lonsearchcat.pm Mon May 10 09:06:29 2004
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Search Catalog
#
-# $Id: lonsearchcat.pm,v 1.225 2004/05/09 22:55:17 matthew Exp $
+# $Id: lonsearchcat.pm,v 1.226 2004/05/10 13:06:29 matthew Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1400,7 +1400,7 @@
$pretty_search_string .= $pretty_domains_string."<br />\n";
#
if (@queries) {
- $query="SELET * FROM metadata WHERE ".join(" AND ",@queries);
+ $query="SELECT * FROM metadata WHERE ".join(" AND ",@queries);
} elsif ($customquery) {
$query = '';
}
@@ -1600,9 +1600,7 @@
-build => 'Text::Query::Build');
$q->prepare($logic_statement);
my $matchexp=${$q}{'matchexp'}; chomp $matchexp;
- &Apache::lonnet::logthis('matchexp = '.$matchexp);
my $sql_query=&recursive_SQL_query_build($field_name,$matchexp);
- &Apache::lonnet::logthis('sql_query = '.$sql_query);
return $sql_query;
}
@@ -2972,7 +2970,7 @@
{ name=>'goto_list',
type => 'list',
translate => 'Resources that follow this resource in maps',},
- { name=>'usage_list',
+ { name=>'sequsage_list',
type => 'list',
translate => 'Resources using or importing resource',},
) {