diff --git a/src/clj/game/cards/operations.clj b/src/clj/game/cards/operations.clj index f37f74591b..4d8d273bb8 100644 --- a/src/clj/game/cards/operations.clj +++ b/src/clj/game/cards/operations.clj @@ -2306,7 +2306,12 @@ :prompt "Add Subliminal Messaging to HQ?" :yes-ability {:msg "add Subliminal Messaging to HQ" - :effect (effect (move card :hand))}}}]}) + :async true + :effect (req (wait-for (reveal state side (make-eid state eid) card)) + (move state side card :hand) + (effect-completed state side eid))}}}]}) + + (defcard "Success" (letfn [(advance-n-times [state side eid card target n] diff --git a/test/clj/game/cards/operations_test.clj b/test/clj/game/cards/operations_test.clj index a82b47f754..deba5b5c08 100644 --- a/test/clj/game/cards/operations_test.clj +++ b/test/clj/game/cards/operations_test.clj @@ -3738,7 +3738,8 @@ ;; Subliminal Messaging - Playing/trashing/milling will all prompt returning to hand (testing "Basic test" (do-game - (new-game {:corp {:deck [(qty "Subliminal Messaging" 3)]} + (new-game {:corp {:id "Hyoubu Institute: Absolute Clarity" + :deck [(qty "Subliminal Messaging" 3)]} :runner {:id "Noise: Hacker Extraordinaire" :deck [(qty "Cache" 3) "Utopia Shard"]}}) (play-from-hand state :corp "Subliminal Messaging") @@ -3756,6 +3757,7 @@ (click-prompt state :corp "Yes") (is (= 3 (count (:hand (get-corp)))) "All 3 Subliminals returned to HQ") (core/move state :corp (find-card "Subliminal Messaging" (:hand (get-corp))) :deck) + (is (= 10 (:credit (get-corp))) "Only first subliminal should give Hyoubu reveal credit") (take-credits state :corp) (play-from-hand state :runner "Cache") (play-from-hand state :runner "Utopia Shard")