luciano/reitit
1
0
Fork 0
mirror of https://github.com/metosin/reitit.git synced 2026-02-07 04:13:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

Add reitit.ring.middleware.session ns

Browse source
This commit is contained in:
Daw-Ran Liou 2019-09-30 15:48:08 -07:00
parent 1d6f3c994a
commit 83b2e90ca7
1 changed files with 23 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

23
modules/reitit-middleware/src/reitit/ring/middleware/session.clj Normal file
View file

@ -0,0 +1,23 @@
(ns reitit.ring.middleware.session
(:require
[ring.middleware.session :as session]
[ring.middleware.session.memory :as memory]))
(def ^:private store
"The in-memory session store.
This is used when no `:session` key is provided to the middleware."
(atom {}))
(def session-middleware
"Middleware for session.
Decodes the session from a request map into the `:session` value and updates the session store
based on the response's `:session` value.
| key | description |
| -------------|-------------|
| `:session` | `ring.middleware.session.store/SessionStore` instance. Use `ring.middleware.session.memory/MemoryStore` by default."
{:name :session
:compile (fn [{:keys [session] :or {session {:store (memory/memory-store store)}}} _]
{:wrap #(session/wrap-session % session)})})