Pārlūkot izejas kodu

only set .field on map entries.

and later collection values.
Lucas Stadler 12 gadi atpakaļ
vecāks
revīzija
29665eef6a
1 mainītis faili ar 1 papildinājumiem un 4 dzēšanām
  1. 1 4
      clj/clarity/cljs/clarity.cljs

+ 1 - 4
clj/clarity/cljs/clarity.cljs

@ -37,14 +37,12 @@
37 37
(defmethod make-typed-input 'Number [number owner]
38 38
  (om/component
39 39
    (dom/input #js {:type "number"
40
                    :className "field"
41 40
                    :value (om/value number)
42 41
                    :onChange #(om/update! number (fn [_ n] n) (js/parseFloat (.. % -target -value)))})))
43 42
44 43
(defmethod make-typed-input 'Keyword [kw owner]
45 44
  (om/component
46 45
    (dom/input #js {:type "text"
47
                    :className "field"
48 46
                    :value (om/value kw)
49 47
                    :pattern "^:(\\w+|\\w+(\\.\\w+)*\\/\\w+)$"
50 48
                    :onChange (fn [ev]
@ -54,13 +52,12 @@
54 52
(defmethod make-typed-input 'String [string owner]
55 53
  (om/component
56 54
    (dom/input #js {:type "text"
57
                    :className "field"
58 55
                    :value (om/value string)
59 56
                    :onChange #(om/update! string (fn [_ n] n) (.. % -target -value))})))
60 57
61 58
(defmethod make-typed-input 'HMap [m owner {type :type}]
62 59
  (om/component
63
    (dom/div #js {:className "field"}
60
    (dom/div nil
64 61
      (dom/span nil "{")
65 62
      (into-array
66 63
        (map (fn [[k v]]