🐛 Fix behavior of search box in dashboard

This commit is contained in:
Andrés Moya 2020-04-17 10:15:02 +02:00
parent 490949ebee
commit f19a8e67e1
2 changed files with 4 additions and 9 deletions

View file

@ -71,7 +71,8 @@
[:& profile-section {:profile profile}] [:& profile-section {:profile profile}]
[:& sidebar {:team-id team-id [:& sidebar {:team-id team-id
:project-id project-id :project-id project-id
:section page}] :section page
:search-term search-term}]
[:div.dashboard-content [:div.dashboard-content
(case page (case page
:dashboard-search :dashboard-search

View file

@ -145,12 +145,6 @@
(debounced-emit! (rt/nav :dashboard-search {:team-id team-id} {})) (debounced-emit! (rt/nav :dashboard-search {:team-id team-id} {}))
(debounced-emit! (rt/nav :dashboard-search {:team-id team-id} {:search-term value}))))) (debounced-emit! (rt/nav :dashboard-search {:team-id team-id} {:search-term value})))))
on-search-blur
(fn [event]
(let [target (dom/get-target event)]
(dom/clean-value! target)))
;; (debounced-emit! (rt/nav :dashboard-team {:team-id team-id}))))
on-search-change on-search-change
(fn [event] (fn [event]
(let [value (-> (dom/get-target event) (let [value (-> (dom/get-target event)
@ -175,8 +169,8 @@
:default-value search-term-not-nil :default-value search-term-not-nil
:autoComplete "off" :autoComplete "off"
:on-focus on-search-focus :on-focus on-search-focus
:on-blur on-search-blur :on-change on-search-change
:on-change on-search-change}] :ref #(when % (set! (.-value %) search-term-not-nil))}]
[:div.clear-search [:div.clear-search
{:on-click on-clear-click} {:on-click on-clear-click}
i/close]] i/close]]