From 91b171e7584920d03abb9c45e779c84f3dee975c Mon Sep 17 00:00:00 2001 From: "myk%mozilla.org" <> Date: Sun, 29 Sep 2002 01:42:23 +0000 Subject: Fix for bug 98801: Implementation of the request tracker, a set of enhancements to attachment statuses. r=gerv,bbaetz --- userprefs.cgi | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'userprefs.cgi') 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, -- cgit v1.2.3-24-g4f1b