--- loncom/metadata_database/searchcat.pl 2003/12/26 15:13:48 1.50 +++ loncom/metadata_database/searchcat.pl 2003/12/27 01:52:04 1.52 @@ -2,7 +2,7 @@ # The LearningOnline Network # searchcat.pl "Search Catalog" batch script # -# $Id: searchcat.pl,v 1.50 2003/12/26 15:13:48 www Exp $ +# $Id: searchcat.pl,v 1.52 2003/12/27 01:52:04 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -283,6 +283,9 @@ my $dbh; "version TEXT, notes TEXT, abstract TEXT, mime TEXT, language TEXT, ". "creationdate DATETIME, lastrevisiondate DATETIME, owner TEXT, ". "copyright TEXT, dependencies TEXT, ". + "modifyinguser TEXT, authorspace TEXT, ". + "lowestgradelevel INTEGER UNSIGNED, highestgradelevel INTEGER UNSIGNED, ". + "standards TEXT, ". "count INTEGER UNSIGNED, ". "course INTEGER UNSIGNED, course_list TEXT, ". "goto INTEGER UNSIGNED, goto_list TEXT, ". @@ -293,13 +296,14 @@ my $dbh; "difficulty FLOAT, difficulty_list TEXT, ". "clear FLOAT, technical FLOAT, correct FLOAT, helpful FLOAT, depth FLOAT, ". "comments TEXT, ". + "FULLTEXT idx_title (title), ". "FULLTEXT idx_author (author), FULLTEXT idx_subject (subject), ". "FULLTEXT idx_url (url), FULLTEXT idx_keywords (keywords), ". - "FULLTEXT idx_version (version), FULLTEXT idx_notes (notes), ". + "FULLTEXT idx_notes (notes), ". "FULLTEXT idx_abstract (abstract), FULLTEXT idx_mime (mime), ". - "FULLTEXT idx_language (language), FULLTEXT idx_owner (owner), ". - "FULLTEXT idx_copyright (copyright)) ". + "FULLTEXT idx_owner (owner), ". + "FULLTEXT idx_standards (standards))". "TYPE=MyISAM"; # It would sure be nice to have some logging mechanism. unless ($dbh->do($make_metadata_table)) { @@ -335,6 +339,11 @@ my $insert_sth = $dbh->prepare "?,". # owner "?,". # copyright "?,". # dependencies + "?,". # modifyinguser + "?,". # authorspace + "?,". # lowestgradelevel + "?,". # highestgradelevel + "?,". # standards "?,". # count "?,". # course "?,". # course_list @@ -395,6 +404,11 @@ foreach my $user (@homeusers) { $ref->{'owner'}, $ref->{'copyright'}, $ref->{'dependencies'}, + $ref->{'modifyinguser'}, + $ref->{'authorspace'}, + $ref->{'lowestgradelevel'}, + $ref->{'highestgradelevel'}, + $ref->{'standards'}, $dyn{'count'}, $dyn{'course'}, $dyn{'course_list'},