Commit 71dae6f4 authored by Stephane Glondu's avatar Stephane Glondu
Browse files

Add meaning of steps to election_setup_threshold_trustees

parent 939384df
...@@ -656,6 +656,7 @@ let election_setup_threshold_trustees uuid se () = ...@@ -656,6 +656,7 @@ let election_setup_threshold_trustees uuid se () =
let trustees = match se.se_threshold_trustees with let trustees = match se.se_threshold_trustees with
| None -> pcdata "" | None -> pcdata ""
| Some ts -> | Some ts ->
div [
table ( table (
tr ( tr (
[ [
...@@ -689,7 +690,19 @@ let election_setup_threshold_trustees uuid se () = ...@@ -689,7 +690,19 @@ let election_setup_threshold_trustees uuid se () =
] @ (if show_add_remove then [td [mk_form_trustee_del i]] else []) ] @ (if show_add_remove then [td [mk_form_trustee_del i]] else [])
) )
) ts ) ts
) );
div [
pcdata "Meaning of steps:";
ul [
li [pcdata "0: administrator needs to set threshold"];
li [pcdata "1: action needed from trustee: generate private key"];
li [pcdata "2, 4, 6: waiting for other trustees"];
li [pcdata "3, 5: action needed from trustee: enter private key"];
li [pcdata "7: the key establishment protocol is finished"];
];
];
br ();
]
in in
let form_threshold = let form_threshold =
div [ div [
......
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