specing.

src/clj/auto_ap/routes/vendors.clj

@@ -1,7 +1,9 @@
 (ns auto-ap.routes.vendors
   (:require [compojure.core :refer [context GET PUT POST defroutes wrap-routes]]
             [auto-ap.db.vendors :as vendors]
-            [auto-ap.routes.utils :refer [wrap-secure]]))
+            [auto-ap.routes.utils :refer [wrap-secure]]
+            [auto-ap.entities.vendors :as entity]
+            [clojure.spec.alpha :as s]))
 
 (defroutes routes
   (wrap-routes
@@ -11,10 +13,14 @@
                   :body (pr-str (vendors/get-all))
                   :headers {"Content-Type" "application/edn"}})
             (PUT "/:id" {:keys [edn-params] {:keys [id]} :route-params :as r}
+                 (println edn-params)
+                 (println (s/valid? ::entity/vendor edn-params))
+                 (println (s/explain ::entity/vendor edn-params))
                  {:status 200
                   :body (pr-str (vendors/upsert id edn-params))
                   :headers {"Content-Type" "application/edn"}})
             (POST "/" {:keys [edn-params] :as r}
+                  (println (s/valid? ::entity/vendor edn-params))
                   {:status 200
                    :body (pr-str (vendors/insert edn-params))
                    :headers {"Content-Type" "application/edn"}}))