Add some fonts

resources/public/css/fonts.css

@@ -0,0 +1,61 @@
+@font-face {
+    font-family: 'Input Sans';
+    font-style: normal;
+    font-weight: 400;
+    src: url('/fonts/input-sans/Input-Regular_(InputSans-Regular).ttf');
+
+}
+
+@font-face {
+    font-family: 'Input Sans';
+    font-style: italic;
+    font-weight: 400;
+    src: url('/fonts/input-sans/Input-Italic_(InputSans-Italic).ttf');
+
+}
+
+@font-face {
+    font-family: 'Input Sans';
+    font-style: normal;
+    font-weight: 700;
+    src: url('/fonts/input-sans/Input-Bold_(InputSans-Bold).ttf');
+
+}
+
+@font-face {
+    font-family: 'Input Sans';
+    font-style: italic;
+    font-weight: 700;
+    src: url('/fonts/input-sans/Input-BoldItalic_(InputSans-BoldItalic).ttf');
+}
+
+@font-face {
+    font-family: 'Input Serif';
+    font-style: normal;
+    font-weight: 400;
+    src: url('/fonts/input-serif/Input-Regular_(InputSerif-Regular).ttf');
+
+}
+
+@font-face {
+    font-family: 'Input Serif';
+    font-style: italic;
+    font-weight: 400;
+    src: url('/fonts/input-serif/Input-Italic_(InputSerif-Italic).ttf');
+
+}
+
+@font-face {
+    font-family: 'Input Serif';
+    font-style: normal;
+    font-weight: 700;
+    src: url('/fonts/input-serif/Input-Bold_(InputSerif-Bold).ttf');
+
+}
+
+@font-face {
+    font-family: 'Input Serif';
+    font-style: italic;
+    font-weight: 700;
+    src: url('/fonts/input-serif/Input-BoldItalic_(InputSerif-BoldItalic).ttf');
+}

src_clj/sketchbook/handler.clj

@@ -49,6 +49,7 @@
   (GET "/:sketch" [sketch]
     (let [sketch-item ((keyword sketch) sketches/sketches)]
       (views/sketch-page (:title sketch-item) sketch)))
+  (route/resources "/")
   (route/not-found "Not Found"))
 
 (def app

src_clj/sketchbook/style.clj

@@ -8,16 +8,16 @@
    :large "21px"
    :huge "28px"})
 
-(defn sketch-thumbnail-styles
+(def fonts
-  "Styles for sketch thumbnails"
+  {:input-sans ["'Input Sans'" "'Helvetica Neue'" "sans-serif"]
-  []
+   :input-serif ["'Input Serif'" "'Times New Roman'" "serif"]})
-  [:h3.sketch-thumbnail-title
-   {:font-size (:small sizes)
-    :margin-bottom 0
-    :text-transform "uppercase"}])
-
-(def stylesheet-css
-  (css (sketch-thumbnail-styles)))
 
 (defn stylesheet []
-  stylesheet-css)
+  (css
+   [:h1 :h2 :h3 :h4 :h5
+    {:font-family (:input-serif fonts)}]
+   [:h3.sketch-thumbnail-title
+    {:font-size (:small sizes)
+     :font-weight "normal"
+     :margin-bottom 0
+     :text-transform "uppercase"}]))

src_clj/sketchbook/views.clj

@@ -7,6 +7,7 @@
   [& body]
   `(html5
     [:head
+     (include-css "/css/fonts.css")
      (include-css "stylesheet")]
     [:body ~@body]))