aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/guile/skribilo/utils/compat.scm5
1 files changed, 4 insertions, 1 deletions
diff --git a/src/guile/skribilo/utils/compat.scm b/src/guile/skribilo/utils/compat.scm
index 81f2570..7c00efb 100644
--- a/src/guile/skribilo/utils/compat.scm
+++ b/src/guile/skribilo/utils/compat.scm
@@ -2,6 +2,7 @@
;;; -*- coding: iso-8859-1 -*-
;;;
;;; Copyright 2005, 2006, 2007, 2009 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright 2021 Arun Isaac <arunisaac@systemreboot.net>
;;;
;;;
;;; This file is part of Skribilo.
@@ -105,7 +106,9 @@
(define-public *skribe-rc-directory*
- (string-append (getenv "HOME") "/" ".skribilo"))
+ (let ((home (or (getenv "HOME")
+ (passwd:dir (getpwuid (getuid))))))
+ (string-append home "/" ".skribilo")))
;;; In and out ports