Compare commits

..

2 commits

Author SHA1 Message Date
bom
0b2ac0d289 Fix call 2024-10-11 13:32:38 +02:00
bom
0620c229c2 Use correct spec path in gopass 2024-10-11 13:29:53 +02:00

View file

@ -17,7 +17,7 @@
c (domain/gopass-show-command entry)] c (domain/gopass-show-command entry)]
(i/execute-output! c config))) (i/execute-output! c config)))
(defn-spec resolve-gopass! ::resolved-config (defn-spec resolve-gopass! ::domain/resolved-config
"Resolves gopass values inside a map of key names and entries "Resolves gopass values inside a map of key names and entries
entries may either contain only a path entries may either contain only a path
@ -36,14 +36,14 @@
can be changed by adding another value for ':c4k-auth-filename' can be changed by adding another value for ':c4k-auth-filename'
" "
[devops ::d/devops [devops ::d/devops
resolved-config ::resolved-config] resolved-config ::domain/resolved-config]
(let [config (merge default devops) (let [config (merge default devops)
default-c4k-auth (parse-string (slurp (c4k-d/auth-path config)) default-c4k-auth (parse-string (slurp (c4k-d/auth-path config))
(fn [k] (keyword (.toLowerCase k))))] (fn [k] (keyword (.toLowerCase k))))]
(->> default-c4k-auth (->> default-c4k-auth
(merge resolved-config) (merge resolved-config)
(generate-string) (generate-string)
(spit (domain/config-path config))))) (spit (c4k-d/auth-path config)))))
(st/instrument `run-gopass-command!) (st/instrument `run-gopass-command!)