   [method]
   (->> (:parameters method)
        ((juxt filter remove) (fn [[k v]] (:required v)))
-       (mapv #(into {} %)))) 
+       (mapv #(into {} %))))
 
 (defn generate-function-name
   "Generates a symbol in the form of 'verb-resource', from a method map."
   [method]
   (let [[_ resource-name method-name] (s/split (:id method) #"\.")]
     (-> (str method-name "-" resource-name)
-        ->kebab-case-symbol))) 
+        ->kebab-case-symbol)))
 
 (defn generate-docs [method]
   (str (:description method)


(defn generate-request [base-url method]
  {:method (-> method :httpMethod s/lower-case keyword)
   :url `(str ~base-url ~@(generate-path method))}) 

(defn generate-function-from-method
  [base-url method]

  (let [[required optional] (->> method
                                 split-required-params
                                 (mapv (comp (partial mapv ->kebab-case-symbol) keys)))]
    `[~@required {:keys ~optional}]))

;; > ( template->path-vector "b/{fooBar}/o/{bar}" ["fooBar" "bar"])
;; => ["/b/" foo-bar "/c/" bar ]
