knutsen.co

Knutsen Homepage Source - knutsen.co
git clone git://git.knutsen.co/knutsen.co
Log | Files | Refs | README | LICENSE

head.sex (1040B)

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
(%define (nav title)
  (nav (h1 %title)
       (ul
         (li (a :href "/" /home))
         (li (a :href "/about" /about))
         (li (a :href "/email" /email))
         (li (a :href "https://canvas.knutsen.co" /canvas)))))

(style
  (nav :display flex
       :justify-content space-between)
  (nav h1 :font-size 2em
          :display inline-block)
  (nav ul :list-style none
          :margin (auto 0)
          :display inline-block)
  (nav li :margin-left 0.5em
          :display inline-block)
  (nav li:before :display none))

(%ifdef title
    (title %title" | Knutsen")
    (%log "No title set."))
(meta :http-equiv "Content-Type" :content "text/html; charset=UTF-8")
(meta :name viewport :content "width=device-width, initial-scale=1.0")
(link :rel icon :type image/png :href "favicon.png")
(link :href "https://fonts.googleapis.com/css2?family=Cantarell:ital,wght@0,400;0,700;1,400&family=IBM+Plex+Mono:ital,wght@0,400;0,700;1,400&family=Playfair+Display+SC&display=swap" :rel stylesheet)
(style (%include "styles/main.sex"))