Fixing build bustage. Incorrect usage "foreach my $foo qw(bar baz)" where the qw construct needs to be surrounded by parentheses.

1 files changed, 1 insertions, 1 deletions

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';
     }