     #(format "Describing endpoint %s `/%s'."
              (-> routing-entry :method name .toUpperCase)
              (->> routing-entry :path (str/join "/")))
-    (let [path-str (-> routing-entry :path path->str)
+    (let [path-str        (-> routing-entry :path path->str)
           ;; Ignoring :all for the moment.
-          method-str (-> routing-entry :method name)
+          method-str      (-> routing-entry :method name)
           pio-constructor (:path-item-object-injector swagger-options)]
       ;; Invoke the constructor for the path info. It may need to make changes to the :definitions, so we have
       ;; to let it modify the entire Swagger object ... but we help it out by providing the path

  "Identifies each path parameter and adds a value for it to the swagger-object at the path defined by params-key."
  [swagger-options swagger-object routing-entry params-key]
  (let [path-ids (->> routing-entry :path (filter keyword?))
        reducer (fn [so path-id]
                  (update-in so params-key
                             conj {:name     path-id
                                   :type     :string        ; may add something later to refine this
                                   :in       :path
                                   :required true}))]
    (reduce reducer swagger-object path-ids)))

(defn analyze-schema-key

                                     [:properties k])]
                          [acc-so' (cond-> (assoc-in acc-schema path swagger-schema)
                                           required? (update-in [:required] conj k))])))))
        base    (remove-nil-vals {:description (or (-> schema meta :description)
                                                   (-> schema meta :doc))})]
    (reduce reducer [swagger-object base] schema)))

;; Can we merge simple->swagger-schema and ->swagger-schema?
