aboutsummaryrefslogtreecommitdiff
path: root/module/parameters.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/parameters.scm')
-rw-r--r--module/parameters.scm5
1 files changed, 5 insertions, 0 deletions
diff --git a/module/parameters.scm b/module/parameters.scm
index 8438040d..d58c6333 100644
--- a/module/parameters.scm
+++ b/module/parameters.scm
@@ -26,3 +26,8 @@
;; ev x str -> sxml
(define-public description-filter
(make-parameter (lambda (_ a) a) (ensure procedure?)))
+
+(use-modules (datetime util))
+
+(define-public week-start
+ (make-parameter sun (ensure (lambda (x) (<= sun x sat)))))