                      (page-team-idea id idea published)))
               (POST "/:id/idea" [id idea]
                     (let [id (toint id)]
+                      (info (str "idea posted: " idea))
                       (swap! teams assoc id idea) ; TODO notify visibly that the idea has been published; notify /teams page
                       (redirect (str "/team/" id "?published=true")))))
      (GET "/teams" []

(defn page-team-idea [team-id idea published]
  "Form to submit name of team's gamification idea"
  (page
   "Idea"                               ; TODO better title
   (when published
     [:p.text-success "Your idea has been published"])
   [:form {:action (str "/team/" team-id "/idea"), :method "post"}
    [:label (str "Publish team " team-id "'s gamification idea:")
     [:br]
     [:input {:type "text", :name "idea", :value idea,
              :autofocus "true",
              :title "Describe your idea"}]]
    [:button.btn {:type "submit"} "Publish"]]
   await-voting-html
   ))

            :teams (page-teams @teams)
            :voting (page-projector-voting-ongoing)
            :results (page-vote-results @teams @votes)))
     (context "/command" [] ; GameMaster posts commands here
              (POST "/show-task" [] (str (compare-and-set! projector :prestart :task)))
              (POST "/start-brainstorming" [] (str (compare-and-set! projector :task :teams)))
              (POST "/start-voting" [] (str (and
