diff options
author | Ricardo Wurmus <rekado@elephly.net> | 2020-03-12 08:26:57 +0100 |
---|---|---|
committer | Ricardo Wurmus <rekado@elephly.net> | 2020-03-12 08:26:57 +0100 |
commit | 1b313d375714e88f3736dc770d8d626aab5bfce8 (patch) | |
tree | 7542d5903a023c6224d35df914cb56f19b35e845 | |
parent | 2a15cba89c788123e76ca43e0ba807ba7412b927 (diff) |
config: Add pkg-dir and db-dir.
* mumi/config.scm.in (%config): Add fields for pkg-dir and db-dir.
-rw-r--r-- | mumi/config.scm.in | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/mumi/config.scm.in b/mumi/config.scm.in index a7500a0..7280e46 100644 --- a/mumi/config.scm.in +++ b/mumi/config.scm.in @@ -30,6 +30,25 @@ maybe-dir ;; TODO: use @assetsdir@ variable here "@prefix@/share/mumi/assets"))) + (pkg-dir . ,(let ((maybe-dir + (string-append (getcwd) "/etc"))) + (if (and (getenv "MUMI_UNINSTALLED") + (file-exists? maybe-dir)) + maybe-dir + (let ((dir "@datarootdir@/mumi")) + (if (string-prefix? "${prefix}" dir) + (string-replace dir "@prefix@" + 0 (string-length "${prefix}")) + dir))))) + (db-dir . ,(let ((maybe-dir (getcwd))) + (if (and (getenv "MUMI_UNINSTALLED") + (file-exists? maybe-dir)) + maybe-dir + (let ((dir "@localstatedir@/mumi/db")) + (if (string-prefix? "${prefix}" dir) + (string-replace dir "@prefix@" + 0 (string-length "${prefix}")) + dir))))) (mail-dir . ,(let ((maybe-dir (string-append (getcwd) "/mails"))) (if (and (getenv "MUMI_UNINSTALLED") |