 
    "Bribery"
    {:prompt "How many [Credits]?" :choices :credit
-    :msg (msg "increase the rez cost of the 1st unrezzed ice approached by " target " [Credits]")
+    :msg (msg "increase the rez cost of the 1st unrezzed ICE approached by " target " [Credits]")
     :effect (effect (resolve-ability {:prompt "Choose a server" :choices (req servers)
                                       :effect (effect (run target nil card))} card nil))}
 


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

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

              :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 their Stack")
               :effect (req (move state side (some #(when (= (:cid target) (:cid %)) %)
                                                   (get-in runner [:rig :program]))
                                  :deck {:front true}))}}
