fixed warnings.

2022-07-26 05:56:41 -07:00
parent f6f73a6110
commit 96c80853ef
133 changed files with 670 additions and 1640 deletions
--- a/src/clj/auto_ap/datomic/migrate/rename_codes.clj
+++ b/src/clj/auto_ap/datomic/migrate/rename_codes.clj
@@ -26,7 +26,7 @@
    )
  )

-(defn rename-codes-1 [conn]
+(defn rename-codes-1 [_]
  (let [result (apply concat [(rename  "WE" "WME" (d/connect uri))
                              (rename  "HM" "HIM" (d/connect uri))
                              (rename  "BES" "SBE" (d/connect uri))