   "Vote for a gamification idea"
   (page
    "Vote"
-   [:h1 "The best gamification idea is:"]          ; TODO
+   [:h1 "The best gamification idea is:"]
    [:form {:action "/vote", :method "post"}
     (map
      (fn [[id idea]] [:p

       (fn [[id votes]] [:li votes " votes for team " id " with " (get @teams id)]) ; TODO show picture, format the list nicely
       results)])))

(defn page-gamemaster []
  "Control page for the GameMaster: 1. task info, 2. show task to others, 3. start brainstorming?, 4. start voting, 5. show number voted, 6. show voting results"
  (page

        gm? (:gamemaster? session)]
   (cond
    (or gm? first-visitor?) {:session {:gamemaster? true},
                             :body (page-gamemaster)}
    (= @state :brainstorming) (page-team-registration)
    (= @state :voting) (if (has-voted? req)
                           "Thank you for your vote!"
