From 2915f779c8feef45ec6e3193ff11b92d9449474e Mon Sep 17 00:00:00 2001 From: NB Kelly Date: Fri, 4 Oct 2024 12:09:02 +1300 Subject: [PATCH] fixed juli (pred actually checks now) --- src/clj/game/cards/resources.clj | 7 +++---- test/clj/game/cards/resources_test.clj | 7 ++++--- 2 files changed, 7 insertions(+), 7 deletions(-) diff --git a/src/clj/game/cards/resources.clj b/src/clj/game/cards/resources.clj index 27bc4ff472..0392ea3319 100644 --- a/src/clj/game/cards/resources.clj +++ b/src/clj/game/cards/resources.clj @@ -1853,10 +1853,9 @@ {:event :runner-spent-click :once :per-turn :req (req (let [all-cards (get-all-cards state) - pred (fn [context] - (and (:is-game-action? context) - (resource? (:stripped-source-card context))))] - (and pred + pred #(and (:is-game-action? %) + (resource? (:stripped-source-card %)))] + (and (pred context) (first-event? state side :runner-spent-click #(pred (first %)))))) :cost [(->c :power 1)] diff --git a/test/clj/game/cards/resources_test.clj b/test/clj/game/cards/resources_test.clj index b02ffb5289..6efede751d 100644 --- a/test/clj/game/cards/resources_test.clj +++ b/test/clj/game/cards/resources_test.clj @@ -3532,10 +3532,11 @@ (click-prompt state :runner "Install a card from the grip, paying 1 [Credits] less") (click-card state :runner "Juli Moreira Lee") (is (not (:run @state)) "Run over") - (is (changed? [(:click (get-runner)) -1 - (get-counters (get-resource state 1) :power) 0] + (is (= 1 (:click (get-runner)))) + (is (changed? [(get-counters (get-resource state 1) :power) 0] (click-credit state :runner)) - "Didn't gain click, didn't spend counter"))) + "didn't spend counter") + (is (= 0 (:click (get-runner))) "didn't gain click"))) (deftest kasi-string ;; Kasi String