From 301233f8df92dcb3b84c38ebe707716179e1d419 Mon Sep 17 00:00:00 2001
From: "bugreport%peshkin.net" <>
Date: Wed, 7 Jul 2004 12:10:55 +0000
Subject: Bug 250080: Fix regression causing blank regexp to make all users
 group members r=erik, justdave a=justdave

---
 editgroups.cgi | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'editgroups.cgi')

diff --git a/editgroups.cgi b/editgroups.cgi
index 4390b5d44..1b2f0d3df 100755
--- a/editgroups.cgi
+++ b/editgroups.cgi
@@ -64,7 +64,7 @@ sub RederiveRegexp ($$)
                                 AND grant_type = ? and isbless = 0");
     $sth->execute();
     while (my ($uid, $login) = $sth->fetchrow_array()) {
-        if ($login =~ m/$regexp/i)
+        if (($regexp =~ /\S+/) && ($login =~ m/$regexp/i))
         {
             $sthadd->execute($uid, $gid, GRANT_REGEXP);
         } else {
-- 
cgit v1.2.3-24-g4f1b