habit game only add keyboard shortcut for active items

2022-02-05 13:45:10 -07:00
parent d268b0cdb6
commit b3387e6f24
1 changed files with 3 additions and 3 deletions
--- a/projects/habit-puzzle-game/source/HabitState.kiss
+++ b/projects/habit-puzzle-game/source/HabitState.kiss
@@ -77,13 +77,13 @@
    (add entryTexts)

    (doFor e (the Array<Entry> (concat m.dailyEntries m.bonusEntries m.todoEntries))
-        (let [label (HabitModel.activeLabel e)]
-            (shortcutHandler.registerItem label.label e)))
+        (when (HabitModel.isActive e)
+            (let [label (HabitModel.activeLabel e)]
+                (shortcutHandler.registerItem label.label e))))

    (set shortcutHandler.onBadKey ->:Void [_ _] {})
    (set shortcutHandler.onSelectItem ->:Void [:Entry e]
        (let [label (HabitModel.activeLabel e)]
-            **(TODO reveal a piece of the current puzzle)
            (+= label.points 1)
            (case e.type
                (Todo