Bugfix: selecting text now also [un]completes grub

This commit is contained in:
Nicholas Kariniemi 2013-09-05 11:41:52 +03:00
parent f4eaf7cef9
commit e14fb90e0f

View file

@ -46,7 +46,7 @@
(a/filter #(= (.-keyIdentifier %) "Enter"))))
(defn parse-completed-event [event]
(let [target (.-target event)
(let [target (.-selectedTarget event)
id (.-id target)
completed (dommy/has-class? target "completed")
event-type (if completed :uncomplete :complete)]