     (html5
       [:head
         [:title "Ring: Stacktrace"]
-        (style-resource "ring/css/stacktrace.css")]
+        (include-css "__ring/css/stacktrace.css")]
       [:body
         [:div#exception
           [:h1 (.getName (:class ex))]

        hiccup.page
        clj-stacktrace.core
        clj-stacktrace.repl
        ring.util.response))

(defn wrap-stacktrace-log
  "Wrap a handler such that exceptions are logged to *err* and then rethrown."

   response is returned."
  [handler]
  (fn [request]
    (case (path-info request)
      "/__ring/css/stacktrace.css"
      (resource-response "ring/css/stacktrace.css")
      (try
        (handler request)
        (catch Exception ex
          (ex-response request ex))))))

(defn wrap-stacktrace
  "Wrap a handler such that exceptions are caught, a corresponding stacktrace is
