               :end-turn
               {:req (req (some #(when (and (= (:cid target) (:cid %)) (get-in % [:special :test-run])) %)
                                (get-in runner [:rig :program])))
-               :msg (msg "move " (:title target) " on top of Stack")
+               :msg (msg "move " (:title target) " on top of their Stack")
                :effect (req (move state side (some #(when (= (:cid target) (:cid %)) %)
                                                    (get-in runner [:rig :program]))
                                   :deck {:front true}))}}

   {:effect (effect (gain :credit 9))}

   "Surge"
   {:msg (msg "place 2 virus token on " (:title target))
    :choices {:req #(has? % :subtype "Virus")}
    :effect (effect (add-prop target :counter 2))}



   "Power Nap"
   {:effect (effect (gain :credit (+ 2 (count (filter (fn [c] (has? c :subtype "Double"))
                                                      (:discard runner))))))
    :msg (msg "gain " (+ 2 (count (filter (fn [c] (has? c :subtype "Double")) (:discard runner)))) " [Credits]")}

   "Power to the People"
   {:effect (effect (register-events {:pre-steal-cost
