diff --git a/CHANGELOG.md b/CHANGELOG.md index aee0037e..1f0db9cb 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -2,6 +2,8 @@ ## Unreleased +- Fix home (~) expand for command paths in config + ## 0.106.0 - Change Openai summary from detailed -> auto. diff --git a/src/eca/features/commands.clj b/src/eca/features/commands.clj index 610da85f..f9ceb612 100644 --- a/src/eca/features/commands.clj +++ b/src/eca/features/commands.clj @@ -57,20 +57,21 @@ (->> (get config :commands) (map (fn [{:keys [path]}] - (if (fs/absolute? path) - (when (fs/exists? path) - {:name (normalize-command-name path) - :path path - :type :user-config - :content (slurp path)}) - (keep (fn [{:keys [uri]}] - (let [f (fs/file (shared/uri->filename uri) path)] - (when (fs/exists? f) - {:name (normalize-command-name f) - :path (str (fs/canonicalize f)) - :type :user-config - :content (slurp f)}))) - roots)))) + (let [path (str (fs/expand-home path))] + (if (fs/absolute? path) + (when (fs/exists? path) + {:name (normalize-command-name path) + :path path + :type :user-config + :content (slurp path)}) + (keep (fn [{:keys [uri]}] + (let [f (fs/file (shared/uri->filename uri) path)] + (when (fs/exists? f) + {:name (normalize-command-name f) + :path (str (fs/canonicalize f)) + :type :user-config + :content (slurp f)}))) + roots))))) (flatten) (remove nil?)))