avescodes

(defn keyword->pg-enum
  "Convert a keyword value into an enum-compatible object."
  [enum-type kw]
  (doto (org.postgresql.util.PGobject.)
    (.setType enum-type)
    (.setValue (name kw))))
    
(def ->status
  "Convert a keyword status into a something_status enum object"
  (partial keyword->pg-enum "something_status"))