treading macro with partial for placement argument for func as second

entities.clj

(defn assign-durations [{:keys [resolve_at resolved_at response_at responded_at] :as v}]
  (-> v
      (assign-duration [response_at responded_at] :response-left)
      (assign-duration [resolve_at resolved_at] :resolve-left)))
;; assign-duration 

(-> (first (select tickets (where {:id 25029})))
    (select-keys [ :resolve_at :resolved_at :responded_at :response_at :resolve-left :response-left])
    (select-keys [:resolve_at :resolved_at])
    vals
    vec
    ((partial assign-duration {}) :response-left))