                              (resolve-ability state side
                                               {:prompt "Remove 1 bad publicity or gain 5 [Credits]?"
                                                :choices ["Remove 1 bad publicity" "Gain 5 [Credits]"]
-                                               :msg (msg (.toLowerCase target))
+                                               :msg (msg (if (= target "Remove 1 bad publicity")
+                                                           "remove 1 bad publicity" "gain 5 [Credits]"))
                                                :effect (req (if (= target "Remove 1 bad publicity")
                                                               (lose state side :bad-publicity 1)
                                                               (gain state side :credit 5)))}
                                               card targets)))}}}
+
    "Ronald Five"
    {:events {:runner-trash {:req (req (and (= (:side target) "Corp") (> (:click runner) 0)))
                             :msg "force the runner to lose 1 [Click]" :effect (effect (lose :runner :click 1))}}}

                              (host state side card target)
                              (rez-cost-bonus state side -2) (rez state side (last (:hosted (get-card state card))))
                              (when (:rezzed (last (:hosted (get-card state card))))
                                (update! state side (dissoc (get-card state (last (:hosted card)) :facedown)))))}]}})

                                :effect (let [dmg target]
                                          (req (if (= target "Add Shi.Kyū to score area")
                                                 (do (or (move state :runner (assoc card :agendapoints -1) :scored) ; if the runner did not trash the card on access, then this will work
                                                         (move state :runner (assoc card :agendapoints -1 :zone [:discard]) :scored)) ;if the runner did trash it, then this will work
                                                   (gain-agenda-point state :runner -1)
                                                   (system-msg state side
                                                    (str "adds Shi.Kyū to their score area as -1 agenda point")))
