fix: #164 expand home for GOKU_EDN_CONFIG_FILE

CHANGELOG.org

@@ -3,7 +3,14 @@ All notable changes to this project will be documented in this file. This change
 
 ** Unreleased
 
-[Unreleased Commits]: https://github.com/yqrashawn/GokuRakuJoudo/compare/v0.5.4...HEAD
+[Unreleased Commits]: https://github.com/yqrashawn/GokuRakuJoudo/compare/v0.5.5...HEAD
+
+** 0.5.5 - 2022-07-12
+*** Fixed
+- fix https://github.com/yqrashawn/GokuRakuJoudo/issues/164
+
+[commits in 0.5.5]: https://github.com/yqrashawn/GokuRakuJoudo/compare/v0.5.4...v0.5.5
+
 ** 0.5.4 - 2022-07-12
 *** Changed 
 - use ~/bin/zsh~ instead of ~/bin/sh~ in launch agent https://github.com/yqrashawn/homebrew-goku/blob/9a4f6cd23f51535e046a33fe260876630fc20292/Formula/goku.rb#L28

src/karabiner_configurator/core.clj

@@ -54,9 +54,9 @@
   []
   (cond
     (System/getenv "GOKU_EDN_CONFIG_FILE")
-    (System/getenv "GOKU_EDN_CONFIG_FILE")
+    (fs/expand-home (System/getenv "GOKU_EDN_CONFIG_FILE"))
     (System/getenv "XDG_CONFIG_HOME")
-    (str (System/getenv "XDG_CONFIG_HOME") "/karabiner.edn")
+    (fs/expand-home (str (System/getenv "XDG_CONFIG_HOME") "/karabiner.edn"))
     :else
     (str (System/getenv "HOME") "/.config/karabiner.edn")))
 
@@ -171,9 +171,7 @@
        (string/join \newline errors)))
 
 (defn abs-path [path]
-  (if (= (first path) \~)
-    (.getPath (fs/expand-home path))
-    path))
+  (.getPath (fs/expand-home path)))
 
 (def cli-opts
   [["-h" "--help"]
@@ -185,7 +183,8 @@
                  (let [path (abs-path path)]
                    (and (fs/exists? path)
                         (fs/file? path)
-                        (fs/readable? path)))) "Make sure the file is exits and readable"]]
+                        (fs/readable? path))))
+               "Make sure the file is exits and readable"]]
    ["-d" "--dry-run"]
    ["-A" "--dry-run-all"]])