From b0a669be69a728ffbd5c75aaaf24b9555852bab9 Mon Sep 17 00:00:00 2001 From: Remington Covert Date: Thu, 16 Oct 2014 20:11:57 -0700 Subject: [PATCH] minor bug. --- desktop/src-common/advent/screens/inventory.clj | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/desktop/src-common/advent/screens/inventory.clj b/desktop/src-common/advent/screens/inventory.clj index a014c8b9..f829ab6d 100644 --- a/desktop/src-common/advent/screens/inventory.clj +++ b/desktop/src-common/advent/screens/inventory.clj @@ -76,13 +76,15 @@ :on-touch-down (fn [screen [entities]] (when (:shown? entities) - (run! @(resolve 'advent.screens.scene/scene) :on-reactivate) + (let [{:keys [highlighted-item]} entities] (if highlighted-item (run! @(resolve 'advent.screens.scene/scene) :on-chose-item :item highlighted-item) - (-> entities - (assoc :shown? false) - (assoc :start-showing? false)))))) + (do + (run! @(resolve 'advent.screens.scene/scene) :on-reactivate) + (-> entities + (assoc :shown? false) + (assoc :start-showing? false))))))) :on-resize (fn [screen entities] (height! screen 960)