Don't display vote counts when the max is 1

mcoblenz · Feb 10, 2015 · 465cd4a · 465cd4a
1 parent 92f007f
commit 465cd4a
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/openBallot.ur b/openBallot.ur
@@ -338,7 +338,9 @@ functor Make(M : sig
                                                <xml><button class="btn glyphicon glyphicon-chevron-left"
                                                             onclick={fn _ => set ch.ShowVoters False}/></xml>}
 
-                                          {List.mapX (fn (k, n) => <xml><br/>{[k]} ({[n]})</xml>) votes}
+                                          {List.mapX (fn (k, n) => <xml><br/>{[k]}{case maxVotesPerVoter of
+                                                                                       Some 1 => <xml/>
+                                                                                     | _ => <xml> ({[n]})</xml>}</xml>) votes}
                                         </xml> else <xml>
                                           <button class="btn glyphicon glyphicon-chevron-right"
                                                   onclick={fn _ => set ch.ShowVoters True}/>