Fix for bug 98801: Implementation of the request tracker, a set of enhancements to attachment statuses.

r=gerv,bbaetz

1 files changed, 9 insertions, 0 deletions

diff --git a/userprefs.cgi b/userprefs.cgi
index 369c681ca..1d4be2a78 100755
--- a/userprefs.cgi
+++ b/userprefs.cgi
@@ -207,6 +207,11 @@ sub DoEmail {
         $vars->{'excludeself'} = 0;
     }
     
+    foreach my $flag qw(FlagRequestee FlagRequester) {
+        $vars->{$flag} = 
+          !exists($emailflags{$flag}) || $emailflags{$flag} eq 'on';
+    }
+    
     # Parse the info into a hash of hashes; the first hash keyed by role,
     # the second by reason, and the value being 1 or 0 for (on or off).
     # Preferences not existing in the user's list are assumed to be on.
@@ -234,6 +239,10 @@ sub SaveEmail {
         $updateString .= 'ExcludeSelf~';
     }
     
+    foreach my $flag qw(FlagRequestee FlagRequester) {
+        $updateString .= "~$flag~" . (defined($::FORM{$flag}) ? "on" : "");
+    }
+    
     foreach my $role (@roles) {
         foreach my $reason (@reasons) {
             # Add this preference to the list without giving it a value,