Add more allowed characters in support issue titles
[hcoop/zz_old/portal.git] / pref.mlt
CommitLineData
566fd712 1<% val you = Init.getUserId ();
56c0e176 2val yourname = Init.getUserName ();
3val youremail = yourname ^ "@hcoop.net";
566fd712 4
5@header [("title", ["Member preferences"])];
6
7if $"cmd" = "mod" then
8 if $"dir" = "on" then
9 Pref.setDirectory you
10 else
11 Pref.unsetDirectory you
56c0e176 12 end;
13
14 if not (iff $"discuss" = "on" then
15 Pref.subscribe ("hcoop-discuss", youremail)
16 else
17 Pref.unsubscribe ("hcoop-discuss", youremail)) then
1fe415e0 18 %><h3>Error setting <tt>hcoop-discuss</tt> status</h3><%
56c0e176 19 end;
20
21 if not (iff $"misc" = "on" then
22 Pref.subscribe ("hcoop-misc", youremail)
23 else
24 Pref.unsubscribe ("hcoop-misc", youremail)) then
1fe415e0 25 %><h3>Error setting <tt>hcoop-misc</tt> status</h3><%
56c0e176 26 end;
566fd712 27
7c1a0a61 28 if not (iff $"sysadmin" = "on" then
29 Pref.subscribe ("hcoop-sysadmin", youremail)
30 else
31 Pref.unsubscribe ("hcoop-sysadmin", youremail)) then
32 %><h3>Error setting <tt>hcoop-sysadmin</tt> status</h3><%
33 end;
34
1fe415e0 35 %><h3>Preferences updated</h3><%
566fd712 36end %>
37
add44c00 38<form action="pref" method="post">
566fd712 39<input type="hidden" name="cmd" value="mod">
1fe415e0 40<table class="blanks">
41<tr> <td><input type="checkbox" name="dir"<% if Pref.hasDirectory you then %> checked<% end %>></td> <td>Include me in the public member directory.</td> </tr>
42<tr> <td><input type="checkbox" name="discuss"<% if Pref.subscribed ("hcoop-discuss", youremail) then %> checked<% end %>></td> <td>Include me on the <tt>hcoop-discuss</tt> mailing list. <i>(On-topic discussion and sporadically high volume)</i></td> </tr>
7c1a0a61 43<tr> <td><input type="checkbox" name="sysadmin"<% if Pref.subscribed ("hcoop-sysadmin", youremail) then %> checked<% end %>></td> <td>Include me on the <tt>hcoop-sysadmin</tt> mailing list. <i>(Discussion about technical adminstrative planning and related issues, not dealing directly with member support requests)</i></td> </tr>
1fe415e0 44<tr> <td><input type="checkbox" name="misc"<% if Pref.subscribed ("hcoop-misc", youremail) then %> checked<% end %>></td> <td>Include me on the <tt>hcoop-misc</tt> mailing list. <i>(Off-topic)</i></td> </tr>
566fd712 45<tr> <td><input type="submit" value="Save"></td> </tr>
46</table>
47
48<% @footer[] %>