From 900c675889a580ddbe79c2c8c952e6c094095822 Mon Sep 17 00:00:00 2001
From: "myk%mozilla.org" <>
Date: Sun, 29 Sep 2002 02:12:25 +0000
Subject: Fixing build bustage.  Incorrect usage "foreach my $foo qw(bar baz)"
 where the qw construct needs to be surrounded by parentheses.

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

diff --git a/userprefs.cgi b/userprefs.cgi
index 1d4be2a78..2cc2b0340 100755
--- a/userprefs.cgi
+++ b/userprefs.cgi
@@ -207,7 +207,7 @@ sub DoEmail {
         $vars->{'excludeself'} = 0;
     }
     
-    foreach my $flag qw(FlagRequestee FlagRequester) {
+    foreach my $flag (qw(FlagRequestee FlagRequester)) {
         $vars->{$flag} = 
           !exists($emailflags{$flag}) || $emailflags{$flag} eq 'on';
     }
-- 
cgit v1.2.3-24-g4f1b