From f5c9ff3aa4e07d58155a1279c73b93c3d94015e6 Mon Sep 17 00:00:00 2001
From: cjwatson <>
Date: Fri, 20 Jun 2003 16:27:02 -0800
Subject: [PATCH] [project @ 2003-06-20 17:27:02 by cjwatson] Lowercase all
 package names for indexing.

---
 cgi/common.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/cgi/common.pl b/cgi/common.pl
index 04e77b82..e42f6e01 100644
--- a/cgi/common.pl
+++ b/cgi/common.pl
@@ -129,7 +129,7 @@ sub quitcgi {
 sub splitpackages {
     my $pkgs = shift;
     return unless defined $pkgs;
-    return split /[ \t?,()]+/, $pkgs;
+    return map lc, split /[ \t?,()]+/, $pkgs;
 }
 
 # Generate a comma-separated list of HTML links to each package given in
-- 
2.39.5