about summary refs log tree commit diff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/pronouns/web.clj6
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))