more specs.

src/clj/auto_ap/db/utils.clj

@@ -1,6 +1,6 @@
 (ns auto-ap.db.utils
-  (:require [config.core :refer [env]])
-  (:require [clojure.string :as str]))
+  (:require [clojure.string :as str]
+            [config.core :refer [env]]))
 
 (defn snake->kebab [s]
   (str/replace s #"_" "-"))
@@ -34,3 +34,14 @@
      :user "ap"
      :password "fifteen-invoices-imported!"}))
 
+
+(defn assign-namespace [x n]
+  (reduce-kv
+   (fn [x k v]
+     (assoc x (if (and (keyword? k)
+                       (not (qualified-keyword? k)))
+                (keyword n (name k))
+                k)
+            v))
+   {}
+   x))