aboutsummaryrefslogtreecommitdiffstats
path: root/gitto
diff options
context:
space:
mode:
Diffstat (limited to 'gitto')
-rw-r--r--gitto/main.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/gitto/main.scm b/gitto/main.scm
index ad4aaa0..32e50d3 100644
--- a/gitto/main.scm
+++ b/gitto/main.scm
@@ -90,7 +90,7 @@
(define (storage-dir xdg-env fallback)
(let ((xdg (getenv xdg-env)))
(string-append
- (or xdg (getenv "HOME")) (unless xdg "/" fallback) "/gitto")))
+ (or xdg (getenv "HOME")) (if xdg "" fallback) "/gitto")))
(define (config-dir) (storage-dir "XDG_CONFIG_HOME" "/.config"))
(define (config-file file) (string-append (config-dir) "/" file))