diff options
author | Hugo Hörnquist <hugo@lysator.liu.se> | 2019-03-12 19:07:10 +0100 |
---|---|---|
committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2019-03-12 19:07:14 +0100 |
commit | 38077f7748d0c06b6eac5bbb95e38dc521269292 (patch) | |
tree | 620af352744832b31f0a8e2f059c079b3262ae71 /config.scm | |
parent | Add a bunch of terminal control modules. (diff) | |
download | calp-38077f7748d0c06b6eac5bbb95e38dc521269292.tar.gz calp-38077f7748d0c06b6eac5bbb95e38dc521269292.tar.xz |
Add interactive terminal UI.term-ui
Diffstat (limited to 'config.scm')
-rw-r--r-- | config.scm | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/config.scm b/config.scm new file mode 100644 index 00000000..3c6ebbb0 --- /dev/null +++ b/config.scm @@ -0,0 +1,12 @@ +;;; Preliminary config file for the system. +;;; Currently loaded by main, and requires that `calendar-files` +;;; is set to a list of files (or directories). + + +(use-modules (srfi srfi-26) + (ice-9 ftw)) + +(define calendar-files + (let ((path (string-append (getenv "HOME") "/.calendars/"))) + (map (cut string-append path <>) + (scandir path (lambda (str) (not (char=? #\. (string-ref str 0)))))))) |