From a376a1ad71b00e0665bf7d60cf2504df2ce19084 Mon Sep 17 00:00:00 2001 From: NB Kelly Date: Tue, 26 May 2026 19:02:21 +1200 Subject: [PATCH] stick and poke clarity log --- src/clj/game/core/def_helpers.clj | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/src/clj/game/core/def_helpers.clj b/src/clj/game/core/def_helpers.clj index ff7f3c7bb1..9ea613df6c 100644 --- a/src/clj/game/core/def_helpers.clj +++ b/src/clj/game/core/def_helpers.clj @@ -196,7 +196,10 @@ ([x] (draw-abi x nil)) ([x draw-args] (draw-abi x draw-args nil)) ([x draw-args ab-base] - (merge {:msg (msg "draw " (quantify x "card")) + (merge {:msg (msg (let [name-side (str/capitalize (name side))] + (when-not (= (:side card) name-side) + (str "force the " name-side " to "))) + "draw " (quantify x "card")) :label (str "Draw " (quantify x "card")) :async true :effect (effect (when (:action ab-base) (play-tiered-sfx state side "click-card" 3 x))