add muuntaja to decode json bodies

deps.edn

@@ -4,7 +4,10 @@
           ;; logging, required by jetty:
         org.slf4j/slf4j-simple {:mvn/version "2.0.16"}
 
-          ;; routing:
+        ;; json decoding
+        metosin/muuntaja {:mvn/version "0.6.11"}
+
+;; routing:
         metosin/reitit {:mvn/version "0.9.1"}
 
           ;; convenient package of "default" middleware:

src/snippets/api.clj

@@ -2,14 +2,15 @@
   (:require
    [ring.adapter.jetty :as jetty]
    [clojure.pprint :as pprint]
+   [muuntaja.middleware :as mm]
    [reitit.ring :as rr]))
 
 (defn handle-ping [args]
   (pprint/pprint args)
   {:status 200, :body "ok"})
 
-(defn handle-create-snippet [args]
-  (pprint/pprint args)
+(defn handle-create-snippet [{body :body-params}]
+  (pprint/pprint body)
   {:status 200, :body "snippet created"})
 
 (defn wrap [handler id]
@@ -19,7 +20,8 @@
 (def app
   (rr/ring-handler
    (rr/router
-    ["/api" {:middleware [[wrap :api]]}
+    ["/api" {:middleware [mm/wrap-format
+                          [wrap :api]]}
      ["/ping" {:get handle-ping}]
      ["/snippet" {:post handle-create-snippet}]])
    (rr/create-default-handler)))