better inventory experience.

2014-12-14 21:30:06 -08:00
parent 88b9774c85
commit 089f9954be
2 changed files with 5 additions and 5 deletions
--- a/desktop/src-common/advent/screens/inventory.clj
+++ b/desktop/src-common/advent/screens/inventory.clj
@@ -85,7 +85,7 @@
                        (assoc entities :highlighted-item nil))))

  :on-touch-up (fn [screen [entities]]
-                   (when (:shown? entities)
+                 (when (and (:shown? entities) (= (button-code :left) (:button screen)))
                     (let [{:keys [highlighted-item]} entities
                           room-entities (-> @(resolve 'advent.screens.scene/scene)
                                                     :entities