Index: openacs-4/packages/glossary/tcl/glossary-init.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/glossary/tcl/glossary-init.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/glossary/tcl/glossary-init.tcl 20 Apr 2001 20:51:12 -0000 1.1 +++ openacs-4/packages/glossary/tcl/glossary-init.tcl 25 Oct 2001 01:52:19 -0000 1.2 @@ -56,7 +56,7 @@ $term: " - set definition [db_string definition_display { + set definition [db_string definition_display_1 { select content from cr_revisions where title = :term @@ -68,7 +68,7 @@ # Try again, case insensitively. set caseless_term [string tolower $term] - set definition [db_string definition_display { + set definition [db_string definition_display_2 { select content from cr_revisions where lower(title) = :caseless_term