Commit a6356cd9 authored by Stephane Glondu's avatar Stephane Glondu
Browse files

Add link to records in admin page

parent 2bdfd452
......@@ -399,6 +399,10 @@ module Make (S : SITE_SERVICES) : TEMPLATES = struct
let service = W.S.election_update_credential in
a ~service [pcdata "Update a credential"] ();
];
div [
let service = W.S.election_dir in
a ~service [pcdata "Voting records"] ESRecords;
];
div [feature_form];
] in
lwt login_box = site_login_box () in
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment