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

Bugfix: double lookup of se in election_setup_credentials_server

parent 850e05df
...@@ -857,7 +857,6 @@ let () = ...@@ -857,7 +857,6 @@ let () =
~absolute:true ~service:election_home ~absolute:true ~service:election_home
(uuid, ()) |> rewrite_prefix (uuid, ()) |> rewrite_prefix
in in
lwt se = Ocsipersist.find election_stable uuid_s in
let module S = Set.Make (PString) in let module S = Set.Make (PString) in
let module G = (val Group.of_string se.se_group : GROUP) in let module G = (val Group.of_string se.se_group : GROUP) in
lwt creds = lwt creds =
......
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