From 0f66dcc489843886d0e092126b8c47fc20a27b54 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Tue, 18 Aug 2020 20:44:25 +0200 Subject: Move towards release. --- system/config.scm | 20 ++++++++++++++++++++ 1 file changed, 20 insertions(+) create mode 100644 system/config.scm (limited to 'system/config.scm') diff --git a/system/config.scm b/system/config.scm new file mode 100644 index 00000000..bc3ce52c --- /dev/null +++ b/system/config.scm @@ -0,0 +1,20 @@ +(set-config! 'calendar-files (glob "/var/lib/calp/.local/var/cal/*")) + +(define (parse-links str) + (define regexp (make-regexp "https?://\\S+")) + (let recur ((str str)) + (let ((m (regexp-exec regexp str))) + (if (not m) + (list str) + (cons* (match:prefix m) + (a (match:substring m)) + (recur (match:suffix m))))))) + +(set-config! 'description-filter + (lambda (ev str) (parse-links str))) + +(set-config! 'week-start mon) +;; (set-config! 'default-calendar "Calendar") + +(set-config 'port 8082) +(set-config 'edit-mode #t) -- cgit v1.2.3