From e9c12af512349cb95a0018e25a9cc54e78b468a4 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@hornquist.se>
Date: Sat, 28 Dec 2019 02:32:38 +0100
Subject: Move config from module to config directory.

---
 module/main.scm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'module/main.scm')

diff --git a/module/main.scm b/module/main.scm
index 72465a50..901746ea 100755
--- a/module/main.scm
+++ b/module/main.scm
@@ -28,8 +28,7 @@ exec guile -e main -s $0 "$@"
 
              (statprof)
 
-             (parameters)
-             (config))
+             (parameters))
 
 (define options
   '((mode (value #t) (single-char #\m))
@@ -47,6 +46,9 @@ exec guile -e main -s $0 "$@"
   (when stprof
     (statprof-start))
 
+  (primitive-load (format #f "~a/.config/calp/config.scm"
+                          (getenv "HOME")))
+
   (with-output-to-port
       (open-output-port (option-ref opts 'output "-"))
     (lambda ()
-- 
cgit v1.2.3