chore: bump borkdude.rewrite-edn to latest

and use consistent alias
This commit is contained in:
Gabriel Horner
2025-05-14 15:55:50 -04:00
parent 6f7e2a94c3
commit 1d8869a4a3
4 changed files with 8 additions and 7 deletions

View File

@@ -7,7 +7,7 @@
[babashka.cli :as cli]
[babashka.process :refer [shell]]
[babashka.fs :as fs]
[borkdude.rewrite-edn :as r]))
[borkdude.rewrite-edn :as rewrite]))
(defn- get-dicts
[]
@@ -78,10 +78,10 @@
[invalid-keys-by-lang]
(doseq [[lang invalid-keys] invalid-keys-by-lang]
(let [path (fs/path "src/resources/dicts" (str (name lang) ".edn"))
result (r/parse-string (String. (fs/read-all-bytes path)))
result (rewrite/parse-string (String. (fs/read-all-bytes path)))
new-content (str (reduce
(fn [result k]
(r/dissoc result k))
(rewrite/dissoc result k))
result invalid-keys))]
(spit (fs/file path) new-content))))
@@ -148,10 +148,10 @@
[invalid-keys]
(let [paths (fs/list-dir "src/resources/dicts")]
(doseq [path paths]
(let [result (r/parse-string (String. (fs/read-all-bytes path)))
(let [result (rewrite/parse-string (String. (fs/read-all-bytes path)))
new-content (str (reduce
(fn [result k]
(r/dissoc result k))
(rewrite/dissoc result k))
result invalid-keys))]
(spit (fs/file path) new-content)))))