X-Git-Url: https://git.distorted.org.uk/~mdw/chopwood/blobdiff_plain/138df99f6815e9fdf9b63566bf1ae9e05dc945c6..1e83d6d9ae0d486fc1205e70123a356220db3bff:/list.fhtml

diff --git a/list.fhtml b/list.fhtml
index a1b3f2c..63b0165 100644
--- a/list.fhtml
+++ b/list.fhtml
@@ -48,13 +48,16 @@
         FORMS.acct = {
           elts: ['list'],
           check: function () { return null; }
-        }
+        }~={allowop.set}:[
+
+        // Password setting is forbidden, so here's a stub function.
+        function check_partial_passwd() { return null; }~;~]
 --></script>
 </div>
 
 <div class=expand-reference>
 
-<h2>Set a new password</h2>
+~={allowop.set}:[~;<h2>Set a new password</h2>
 <table>
 <tr>
   <td class=label>
@@ -92,9 +95,9 @@
             return null;
           }
         }
---></script>
+--></script>~2%~]~
 
-<h2>Generate a new password</h2>
+~={allowop.reset}:[~;<h2>Generate a new password</h2>
 <button type=submit id=reset-submit accesskey=g
         name=%act value=reset><u>G</u>enerate</button>
 <span class=whinge id=reset-whinge>OK</span>
@@ -104,9 +107,9 @@
             return check_accounts() || check_partial_passwd();
           }
         }
---></script>
+--></script>~2%~]~
 
-<h2>Clear the existing passwords</h2>
+~={allowop.clear}:[~;<h2>Clear the existing passwords</h2>
 <button type=submit id=clear-submit accesskey=c
         name=%act value=clear><u>C</u>lear</button>
 <span class=whinge id=clear-whinge>OK</span>
@@ -116,11 +119,20 @@
             return check_accounts() || check_partial_passwd();
           }
         }
---></script>
+--></script>~2%~]~
 
 </div>
 </div>
 
+<input type=hidden name=%user value="~={user}H">
+<input type=hidden name=%nonce value="~={nonce}H">
+</form>
+
+<h2>Log out of Chopwood</h2>
+
+<form method=POST action="~={script}H/logout">
+<button type=submit accesskey=o>Log <u>o</u>ut</button>
+<input type=hidden name=%user value="~={user}H">
 <input type=hidden name=%nonce value="~={nonce}H">
 </form>