Roll call system, and update forms to method=post

[hcoop/portal.git] / kind.mlt

diff --git a/kind.mlt b/kind.mlt
index 2f8f08c..11ce043 100644 (file)
--- a/kind.mlt
+++ b/kind.mlt
@@ -13,7 +13,7 @@ if $"cmd" = "add" then
        val id = Web.stoi ($"mod");
        val kind = Contact.lookupKind id %>
 
-<form action="kind">
+<form action="kind" method="post">
 <input type="hidden" name="save" value="<% id %>">
 <table>
 <tr> <td align="right"><b>Name</b>:</td> <td><input name="name" value="<% Web.html (#name kind) %>"></td> </tr>
@@ -53,7 +53,7 @@ if $"cmd" = "add" then
 
 <h3><b>Add a contact kind</b></h3>
 
-<form action="kind">
+<form action="kind" method="post">
 <input type="hidden" name="cmd" value="add">
 <table>
 <tr> <td align="right"><b>Name</b>:</td> <td><input name="name"></td> </tr>