blob: a10ab951198495d5e46ef574acfe3949fb91f707 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
(ns pics.routes
(:require [reitit.ring :as rring]
[ring.middleware.multipart-params :as rmmultiparams]
[pics.handler.home :as phhome]
[pics.handler.upload :as phupload]))
(def ^:private router
(rring/router [["/" {:get {:handler phhome/handle}}]
["/upload" {:post {:handler phupload/handle}}]]))
(def ring-handler
(-> router
rring/ring-handler
rmmultiparams/wrap-multipart-params))
|
