about summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--resources/images/purple-flag64.pngbin0 -> 3717 bytes
-rw-r--r--src/pronouns/pages.clj3
-rw-r--r--src/pronouns/web.clj8
3 files changed, 9 insertions, 2 deletions
diff --git a/resources/images/purple-flag64.png b/resources/images/purple-flag64.png
new file mode 100644
index 0000000..ba63aee
--- /dev/null
+++ b/resources/images/purple-flag64.png
Binary files differdiff --git a/src/pronouns/pages.clj b/src/pronouns/pages.clj
index 4940207..f9939c3 100644
--- a/src/pronouns/pages.clj
+++ b/src/pronouns/pages.clj
@@ -19,6 +19,7 @@
             [pronouns.config :refer [*pronouns-table*]]
             [pronouns.util :as u]
             [hiccup.core :refer :all]
+            [hiccup.element :as e]
             [hiccup.util :refer [escape-html]]))
 
 (defn prose-comma-list
@@ -70,7 +71,7 @@
 
 (defn header-block [header]
   [:div {:class "section title"}
-   (href "/" [:h1 header])])
+   (href "/" [:h1 (e/image "/purple-flag64.png" "flag logo") header])])
 
 (defn examples-block
   [subject object possessive-determiner possessive-pronoun reflexive]
diff --git a/src/pronouns/web.clj b/src/pronouns/web.clj
index e57d7ec..69ad6ae 100644
--- a/src/pronouns/web.clj
+++ b/src/pronouns/web.clj
@@ -18,11 +18,14 @@
   (:require [compojure.core :refer [defroutes GET PUT POST DELETE ANY]]
             [compojure.handler :refer [site]]
             [compojure.route :as route]
-            [clojure.java.io :as io]
             [clojure.string :as s]
+            [clojure.java.io :as io]
             [ring.middleware.logger :as logger]
             [ring.middleware.stacktrace :as trace]
             [ring.middleware.params :as params]
+            [ring.middleware.resource :refer [wrap-resource]]
+            [ring.middleware.content-type :refer [wrap-content-type]]
+            [ring.middleware.not-modified :refer [wrap-not-modified]]
             [ring.adapter.jetty :as jetty]
             [environ.core :refer [env]]
             [pronouns.util :as u]
@@ -58,6 +61,9 @@
 
 (def app
   (-> app-routes
+      (wrap-resource "images")
+      wrap-content-type
+      wrap-not-modified
       logger/wrap-with-logger
       wrap-error-page
       trace/wrap-stacktrace