Hovering fix

This commit is contained in:
Bryce Covert
2019-09-12 20:47:16 -07:00
parent 051280970f
commit dbe4c7b9c4
6 changed files with 57 additions and 6 deletions

View File

@@ -218,6 +218,7 @@
(let [t (match->text entity)]
^{:key entity} [:li.typeahead-suggestion {:class (if (= entity h)
"typeahead-highlighted")
:on-mouse-over (fn [] (reset! highlighted entity))
:on-mouse-down #(do (select entity))} t]))]])
:else