add better malformed request error messaging

2014-04-06 17:04:21 -04:00 · 2014-04-06 17:04:21 -04:00 · 363edd0200
parent 7279075e07
commit 363edd0200
1 changed files with 7 additions and 2 deletions
--- a/src/toascii/routes/api/art.clj
+++ b/src/toascii/routes/api/art.clj
@ -8,10 +8,15 @@
  :available-media-types ["application/json"]
  :malformed?
  (fn [_]
-    (not (art/valid-name? q)))
+    (if-not (art/valid-name? q)
+      {:error "Invalid name."}))
  :handle-ok
  (fn [_]
-    (art/search q)))
+    (art/search q))
+  :handle-malformed
+  (fn [ctx]
+    (:error ctx))
+  )

 (register-routes api-art-routes
  (ANY "/api/art" {{q :q} :params} (art-search q)))