gered/webtools
Archived
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

body now optional for response helpers (if just http status is enough)

Browse source
This commit is contained in:
Gered 2015-01-08 19:08:03 -05:00
parent 6f203c26ea
commit e10a5e08e4
1 changed files with 11 additions and 11 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

22
src/clj_webtoolbox/response_helpers.clj
View file

@ -6,17 +6,17 @@
(-> (response/content body) (-> (response/content body)
(response/status status))) (response/status status)))
(defn ok [body] (->response body 200)) (defn ok [& [body]] (->response body 200))
(defn created [body] (->response body 201)) (defn created [& [body]] (->response body 201))
(defn accepted [body] (->response body 202)) (defn accepted [& [body]] (->response body 202))
(defn no-content [body] (->response body 204)) (defn no-content [& [body]] (->response body 204))
(defn moved [body] (->response body 301)) (defn moved [& [body]] (->response body 301))
(defn found [body] (->response body 302)) (defn found [& [body]] (->response body 302))
(defn bad-request [body] (->response body 400)) (defn bad-request [& [body]] (->response body 400))
(defn unauthorized [body] (->response body 401)) (defn unauthorized [& [body]] (->response body 401))
(defn forbidden [body] (->response body 403)) (defn forbidden [& [body]] (->response body 403))
(defn not-found [body] (->response body 404)) (defn not-found [& [body]] (->response body 404))
(defn error [body] (->response body 500)) (defn error [& [body]] (->response body 500))