[added rudimentary admin page
Stefan Wehr <mail@stefanwehr.de>**20110814110240
 Ignore-this: 3280b81268ef460e2997dda89e8181c8
] {
hunk ./Distribution/Server/Pages/Template.hs 73
+    , ("Admin",         adminURL)
hunk ./Distribution/Server/Pages/Template.hs 95
+-- URL of the admin front end
+adminURL :: URL
+adminURL = "/admin.html"
+
hunk ./static/accounts.html 15
+<TD><A HREF="/admin.html">Admin</A></TD>
hunk ./static/admin.html 18
+<TD><A HREF="/admin.html">Admin</A></TD>
hunk ./static/admin.html 26
-<H3>Add User</H3>
+<UL>
+<LI><A HREF="/users/register">Add user</A></LI>
+<LI>Edit groups: <A HREF="/users/admins/edit">admin</A>,
+  <A HREF="/packages/mirrorers/edit">mirrorers</A>,
+  <A HREF="/packages/trustees/edit">trustees</A></LI>
+</UL>
hunk ./static/admin.html 33
-<FORM CLASS="box" action="/admin/users/add" method="post" enctype="multipart/form-data">
-<P>User name: <INPUT type="text" name="user-name"></P>
-<P>Password:  <INPUT type="password" name="password"></P>
-<P>Repeat password: <INPUT type="password" name="repeat-password"></P>
-<INPUT type="submit" value="Add User">
-</FORM>
-
-  
+<!--
hunk ./static/admin.html 43
-<!--  
hunk ./static/admin.html 50
-  
+
hunk ./static/admin.html 68
-<H3>Make User Admin</H3>
-
-<FORM CLASS="box" action="/admin/users/toggle-admin" method="post" enctype="multipart/form-data">
-<P>User name: <INPUT type="text" name="user-name"></P>
-<INPUT type="hidden" name="admin" value="True">
-<INPUT type="submit" value="Make admin">
-</FORM>
-
-<H3>Revoke Admin Status</H3>
-
-<FORM CLASS="box" action="/admin/users/toggle-admin" method="post" enctype="multipart/form-data">
-<P>User name: <INPUT type="text" name="user-name"></P>
-<INPUT type="hidden" name="admin" value="False">
-<INPUT type="submit" value="Revoke admin status">
-</FORM>
-
hunk ./static/hackage.html 15
+<TD><A HREF="/admin.html">Admin</A></TD>
hunk ./static/upload.html 17
+<TD><A HREF="/admin.html">Admin</A></TD>
}