add initial wrap-exceptions handler

This commit is contained in:
Gered 2014-03-30 16:37:14 -04:00
parent 5a732e9a84
commit 76697d3763
2 changed files with 19 additions and 7 deletions

View file

@ -8,7 +8,8 @@
[clj-jtwig.web.middleware :refer [wrap-servlet-context-path]]
[toascii.route-utils :refer [find-routes]]
[toascii.models.flf :as flf]
[toascii.util :refer [log-formatter]]))
[toascii.util :refer [log-formatter]]
[toascii.middleware :refer [wrap-exceptions]]))
(defroutes app-routes
(route/resources "/")
@ -16,9 +17,9 @@
(defonce routes (find-routes "toascii.routes." app-routes))
(defonce app (app-handler
(def app (app-handler
routes
:middleware [wrap-servlet-context-path]
:middleware [wrap-exceptions wrap-servlet-context-path]
:access-rules []
:formats [:json-kw :edn]))

View file

@ -1 +1,12 @@
(ns toascii.middleware)
(ns toascii.middleware
(:require [taoensso.timbre :refer [log]]))
(defn wrap-exceptions [handler]
(fn [request]
(try
(handler request)
(catch Exception ex
(log :error ex "Unhandled exception lol.")
(println (:uri request) (:context request))
{:status 500
:body "An error occurred! oh noes!"}))))