From 65a823060bb336ba4b5d3b544630f66e80337005 Mon Sep 17 00:00:00 2001 From: "terry%mozilla.org" <> Date: Fri, 14 Jul 2000 03:04:14 +0000 Subject: Keywords were already enforced to never differ only in capitalization. So, changed the code so that case no longer matters when typing in the name of a keyword. --- globals.pl | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) (limited to 'globals.pl') diff --git a/globals.pl b/globals.pl index 91ef44cee..58942ba01 100644 --- a/globals.pl +++ b/globals.pl @@ -104,7 +104,7 @@ sub SyncAnyPendingShadowChanges { $shadowchanges = 0; } } - + my $dosqllog = (-e "data/sqllog") && (-w "data/sqllog"); @@ -472,6 +472,7 @@ sub GenerateVersionTable { SendSQL("SELECT id, name FROM keyworddefs ORDER BY name"); while (MoreSQLData()) { my ($id, $name) = FetchSQLData(); + $name = lc($name); $::keywordsbyname{$name} = $id; push(@::legal_keywords, $name); } @@ -485,6 +486,14 @@ sub GenerateVersionTable { } +sub GetKeywordIdFromName { + my ($name) = (@_); + $name = lc($name); + return $::keywordsbyname{$name}; +} + + + # Returns the modification time of a file. -- cgit v1.2.3-24-g4f1b