Bug 250080: Fix regression causing blank regexp to make all users group members

r=erik, justdave a=justdave

Bug 250080: Fix regression causing blank regexp to make all users group members
301233f8 · bugreport%peshkin.net · 2021015b · 301233f8
Commit 301233f8 authored Jul 07, 2004 by bugreport%peshkin.net
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

editgroups.cgi editgroups.cgi +1 -1

No files found.
--- 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 {