diff options
| author | Morgan Astra <m@morganastra.me> | 2017-11-04 16:05:47 -0700 |
|---|---|---|
| committer | Morgan Astra <m@morganastra.me> | 2017-11-04 16:05:47 -0700 |
| commit | 6624f5f69b688741f31a8e8e5d0579853db6071a (patch) | |
| tree | c3fc658ccc6bfde98dd252a0b22014a5d4ef4291 | |
| parent | fedfc3ae45b2f6aca60f5b26fa163768e0a67d55 (diff) | |
A woman is not dead while her name is still spoken.
| -rw-r--r-- | src/pronouns/web.clj | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/pronouns/web.clj b/src/pronouns/web.clj index e57d7ec..bbbce82 100644 --- a/src/pronouns/web.clj +++ b/src/pronouns/web.clj @@ -47,6 +47,11 @@ (ANY "*" [] (route/not-found (slurp (io/resource "404.html"))))) +(defn wrap-gnu-natalie-nguyen [handler] + (fn [req] + (when-let [resp (handler req)] + (assoc-in resp [:headers "X-Clacks-Overhead"] "GNU Natalie Nguyen")))) + (defn wrap-error-page [handler] (fn [req] (try (handler req) @@ -60,6 +65,7 @@ (-> app-routes logger/wrap-with-logger wrap-error-page + wrap-gnu-natalie-nguyen trace/wrap-stacktrace params/wrap-params)) |