diff options
Diffstat (limited to 'lisp/webapps')
| -rw-r--r-- | lisp/webapps/resume/clojurescript/resume/src/resume/core.clj | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/lisp/webapps/resume/clojurescript/resume/src/resume/core.clj b/lisp/webapps/resume/clojurescript/resume/src/resume/core.clj index 7d61812..829fa66 100644 --- a/lisp/webapps/resume/clojurescript/resume/src/resume/core.clj +++ b/lisp/webapps/resume/clojurescript/resume/src/resume/core.clj @@ -122,9 +122,7 @@ [:thead [:tr (for [key# (filter #(not (str/includes? % "_id")) keys#)] - [:th {:id (str "th-" ~component "-" key#) - :key (str "th-" ~component "-" key#) - :scope "col"} + [:th {:scope "col"} key#]) [:th {:scope "col"} "Mod"] [:th {:scope "col"} "Del"]]] @@ -132,10 +130,11 @@ (for [rec# results#] (let [tr-attributes# (atom {:id (str "tr-" ~component "-" (get rec# "id")) :key (str "tr-" ~component "-" (get rec# "id"))}) - td-attributes# (atom {:on-click #()})] + td-attributes# (atom {:on-click #(print "yourmom")})] [:tr @tr-attributes# (for [key# (filter #(not (str/includes? % "_id")) keys#)] - [:td (str (get rec# key#))]) + [:td @td-attributes# + (str (get rec# key#))]) [:td {:width "30"} [:img {:src "/static/images/edit.png" :on-click #(~(symbol (str "on-" component "-modify-clicked")) (get rec# "id"))}]] |