Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
belenios
belenios
Commits
76fb81b8
Commit
76fb81b8
authored
Jan 11, 2013
by
Stephane Glondu
Browse files
More things in view template
parent
c351faf0
Changes
2
Hide whitespace changes
Inline
Side-by-side
helios/src/helios_templates.ml
View file @
76fb81b8
...
...
@@ -350,6 +350,7 @@ let election_view ~election =
]
()
];
br
()
;
br
()
;
(* if election.voting_extended_until ... *)
pcdata
"This election ends at the administrator's discretion."
;
br
()
;
...
...
src/helios_registration.ml
View file @
76fb81b8
...
...
@@ -68,7 +68,11 @@ let format_election e =
user_name
=
"admin"
;
user_type
=
"dummy"
;
}
in
let
election_trustees
=
[]
in
let
election_trustees
=
e
.
public_data
.
public_keys
|>
Array
.
map
(
fun
k
->
k
.
trustee_public_key
.
y
|>
Z
.
to_string
|>
hashB
)
|>
Array
.
to_list
in
let
election_state
=
match
e
.
public_data
.
election_result
with
|
Some
r
->
Array
.
mapi
(
fun
i
q
->
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment