simon/youyesyet
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

Quick fix on select menus

Browse source
This commit is contained in:
Simon Brooke 2017-03-26 18:47:45 +01:00
parent a589afb6ab
commit e5299bd2cf
1 changed files with 6 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
src/cljs/youyesyet/views/followup.cljs
View file

@ -53,16 +53,16 @@
[:form {}
[:p.widget
[:label {:for "elector"} "Elector"]
[:select {:id "elector" :name "elector"}
[:select {:id "elector" :name "elector" :value (:id elector)}
(map
#(let [selkey (if (= (:id elector) (:id %)) :selected :not-selected)]
[:option {:value (:id %) :key (:id %) selkey "true"} (:name %)]) (:electors address))]]
#(let []
[:option {:value (:id %) :key (:id %)} (:name %)]) (:electors address))]]
[:p.widget
[:label {:for "issue"} "Issue"]
[:select {:id "issue" :name "issue"}
[:select {:id "issue" :name "issue" :value issue}
(map
#(let [selkey (if (= issue %) :selected :not-selected)]
[:option {selkey "true" :key %} %]) (keys issues))]]
#(let []
[:option {:key % :value %} %]) (keys issues))]]
[:p.widget
[:label {:for "telephone"} "Telephone number"]
[:input {:type "text" :id "telephone" :name "telephone"}]]