clojure - リングセッションストアをデバッグするには?

Question

アプリを定義し、sessionストアに含まれるすべての値を出力できるようにしたいのですが、これを行う良い方法はありますか?

(def app
  (-> #'handler
      (ring.middleware.stacktrace/wrap-stacktrace)
      (ring.middleware.session/wrap-session)))

Answer 1

wrap-session が使用するセッション ストアを指定できます。

(def all-the-sessions (atom {}))

(def app
  (-> #'handler
    (ring.middleware.stacktrace/wrap-stacktrace)
    (ring.middleware.session/wrap-session {:store (ring.middleware.session.memory/memory-store all-the-sessions)))

これで、すべてのセッション アトムを調べることができます。