    default-text: What shows if nothing is selected
    lkey: which key in the menu items that should be used as label (text)
    name: the name of the input field"
-  [data owner]
+  [data owner {:keys [ch]}]
   (reify
     om/IDisplayName
     (display-name [_]

        cursor   (if (< 1 (count selected))
                   (get-in data (pop selected))
                   data)]
    (om/update! cursor (last selected) value)))

(defn dropdown-click
  "Dropdown is clicked"
  [owner]
  (om/update-state! owner :open not))

(defn -itemdiv

       :name "dropdown"
       :tabidx 0
       :disabled false
       :open false
       :ch ch})
    om/IRenderState
    (render-state [_ {:keys [name lkey idkey open disabled
                             tabidx default-text class] :as state}]
