+ if not (iff $"discuss" = "on" then
+ Pref.subscribe ("hcoop-discuss", youremail)
+ else
+ Pref.unsubscribe ("hcoop-discuss", youremail)) then
+ %><h3>Error setting <tt>hcoop-discuss</tt> status</h3><%
+ end;
+
+ if not (iff $"misc" = "on" then
+ Pref.subscribe ("hcoop-misc", youremail)
+ else
+ Pref.unsubscribe ("hcoop-misc", youremail)) then
+ %><h3>Error setting <tt>hcoop-misc</tt> status</h3><%
+ end;
+
+ if not (iff $"sysadmin" = "on" then
+ Pref.subscribe ("hcoop-sysadmin", youremail)
+ else
+ Pref.unsubscribe ("hcoop-sysadmin", youremail)) then
+ %><h3>Error setting <tt>hcoop-sysadmin</tt> status</h3><%
+ end;
+
+ %><h3>Preferences updated</h3><%