Supports forcing vendor
This commit is contained in:
@@ -120,7 +120,7 @@
|
||||
valid-matches)]
|
||||
valid-matches))
|
||||
(defn typeahead-entity [{:keys [matches on-change field value class not-found-description
|
||||
disabled not-found-value auto-focus]}]
|
||||
disabled not-found-value auto-focus name]}]
|
||||
(let [text (r/atom (or (second (first (filter #(= (first %) value) matches))) ""))
|
||||
highlighted (r/atom nil)
|
||||
]
|
||||
@@ -153,6 +153,8 @@
|
||||
[:div.control
|
||||
[:div.tags.has-addons
|
||||
[:span.tag text]
|
||||
(when name
|
||||
[:input {:type "hidden" :name name :value (:id @highlighted)}])
|
||||
[:a.tag.is-delete {:on-click (fn []
|
||||
(select nil)
|
||||
(reset! text-atom nil)
|
||||
|
||||
Reference in New Issue
Block a user