(define-module (builder includes)
  #:use-module (builder components)
  #:export (header footer navigation))

(define (header name desc image)
  `(header (@ (class "header h-card"))
     (div (img (@ (src ,image) (class "header-image u-photo"))))
     (div (@ (class "header-text"))
       (h2 (@ (class "header-title")) 
           (a (@ (rel "me") (class "u-url") (href "/"))
           "Hi, "
           (span (@ (class "p-name")) ,name)
           " here 👋"))
       (div (@ (class "header-desc p-note")) ,desc))))

(define (navigation)
  `(nav ,(linkline 
          (slash "/elsewhere")
          (slash "/uses")
          (slash "/donates"))))