diff --git a/src/clj/game/cards/programs.clj b/src/clj/game/cards/programs.clj
index bb48961806..c7e6e528fb 100644
--- a/src/clj/game/cards/programs.clj
+++ b/src/clj/game/cards/programs.clj
@@ -2158,6 +2158,7 @@
                                    valid (filter #(not (facedown? %)) hosted)
                                    same-title (filter #(= (:title card) (:title %)) valid)]
                                (and (active-encounter? state)
+                                    current-ice card
                                     (<= (get-strength current-ice) (get-strength card))
                                     (not-empty same-title))))
                                         ; no break-req to not enable auto-pumping
diff --git a/src/clj/game/core/actions.clj b/src/clj/game/core/actions.clj
index da70c9d40c..291aec58ac 100644
--- a/src/clj/game/core/actions.clj
+++ b/src/clj/game/core/actions.clj
@@ -58,6 +58,7 @@
   ([state side args] (play-ability state side nil args))
   ([state side eid {:keys [card] ability-idx :ability :as args}]
    (let [card (get-card state card)
+         args (assoc args :card card)
          ability (nth (:abilities card) ability-idx)
          cannot-play (or (:disabled card)
                          (any-effects state side :prevent-paid-ability true? card [ability ability-idx]))]