blob: 3ae0e1da5bd1e32dad8373af94b3888e6dba11f8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
(define-module (html config)
:use-module (util)
:use-module (util config)
)
(define-public debug (make-parameter #f))
(define-config debug #f
"Places the generated thingy in debug mode"
post: debug)
;;; NOTE edit mode should preferably depend on login-status of the user
;;; but this works for the time being.
(define-public edit-mode (make-parameter #t))
(define-config edit-mode #t
"Makes the document editable"
post: edit-mode)
|