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.

git-svn-id: svn://10.0.0.236/trunk@74167 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
terry%mozilla.org
2000-07-13 20:04:15 +00:00
parent 0814704e83
commit 9126128ba9
3 changed files with 12 additions and 5 deletions

View File

@@ -36,7 +36,6 @@ sub sillyness {
$zz = $::unconfirmedstate;
$zz = @::components;
$zz = @::default_column_list;
$zz = @::keywordsbyname;
$zz = @::legal_keywords;
$zz = @::legal_platform;
$zz = @::legal_priority;
@@ -405,7 +404,7 @@ sub GenerateSQL {
if ($value eq '') {
next;
}
my $id = $::keywordsbyname{$value};
my $id = GetKeywordIdFromName($name);
if ($id) {
push(@list, "$table.keywordid = $id");
} else {

View File

@@ -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.

View File

@@ -37,7 +37,6 @@ use vars %::versions,
%::components,
%::COOKIE,
%::MFORM,
%::keywordsbyname,
%::legal_keywords,
%::legal_opsys,
%::legal_platform,
@@ -549,7 +548,7 @@ if ($::FORM{'keywords'}) {
if ($keyword eq '') {
next;
}
my $i = $::keywordsbyname{$keyword};
my $i = GetKeywordIdFromName($keyword);
if (!$i) {
PuntTryAgain("Unknown keyword named <code>$keyword</code>. " .
"<P>The legal keyword names are " .