Allow whitespace to be used to separate keywords.

2 files changed, 9 insertions, 4 deletions

diff --git a/buglist.cgi b/buglist.cgi
index 86fad102e..27e67e390 100755
--- a/buglist.cgi
+++ b/buglist.cgi
@@ -301,8 +301,11 @@ if (defined $::FORM{'sql'}) {
 if ($::FORM{'keywords'}) {
     GetVersionTable();
     my @list;
-    foreach my $v (split(',', $::FORM{'keywords'})) {
-        my $id = $::keywordsbyname{trim($v)};
+    foreach my $v (split(/[\s,]+/, $::FORM{'keywords'})) {
+        if ($v eq '') {
+            next;
+        }
+        my $id = $::keywordsbyname{$v};
         if ($id) {
             push(@list, "keywords.keywordid = $id");
         } else {
diff --git a/process_bug.cgi b/process_bug.cgi
index bc7e2fcbc..5016d5b8a 100755
--- a/process_bug.cgi
+++ b/process_bug.cgi
@@ -400,8 +400,10 @@ my @keywordlist;
 my %keywordseen;
 
 if ($::FORM{'keywords'}) {
-    foreach my $keyword (split(/,/, $::FORM{'keywords'})) {
-        $keyword = trim($keyword);
+    foreach my $keyword (split(/[\s,]+/, $::FORM{'keywords'})) {
+        if ($keyword eq '') {
+            next;
+        }
         my $i = $::keywordsbyname{$keyword};
         if (!$i) {
             print "Unknown keyword named <code>$keyword</code>.\n";