aboutsummaryrefslogtreecommitdiff
path: root/bffe/view/home.scm
blob: 820f75fb9e979ec7403ca61ca6c504b92ffa54b5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
(define-module (bffe view home)
  #:use-module (srfi srfi-1)
  #:use-module (srfi srfi-19)
  #:use-module (ice-9 match)
  #:use-module (ice-9 format)
  #:use-module (bffe view util)
  #:export (home))

(define (home title template-content)
  (layout
   #:title title
   #:body
   `((main
      (raw ,template-content)))))