No Clojure 1.5.0, como posso fornecer uma impressora bonita personalizada para meu próprio tipo de registro, definida com defrecord.

(defrecord MyRecord [a b])

(defmethod print-method MyRecord [x ^java.io.Writer writer]
  (print-method (:a x) writer))

(defmethod print-dup MyRecord [x ^java.io.Writer writer]
  (print-dup (:a x) writer))

(println (MyRecord. 'a 'b)) ;; a -- OK
(clojure.pprint/pprint (MyRecord. 'a 'b)) ;; {:a a, :b b} -- not OK, I want a

eu gostariaclojure.pprint/pprint para usar também a minha impressora de corte (que agora deve apenas impressões bonitas, o que estiver no campo)a do registro para fins de ilustração).