Created
December 1, 2015 09:50
-
-
Save matstani/0ee684cca9e9b53fd61e to your computer and use it in GitHub Desktop.
session cleaner component for jdbc-ring-session.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(ns myapp.component.session-cleaner | |
(:require [com.stuartsierra.component :as component] | |
[jdbc-ring-session.cleaner :refer [start-cleaner stop-cleaner]])) | |
(defrecord SessionCleaner [db] | |
component/Lifecycle | |
(start [component] | |
(if-not (:cleaner component) | |
(assoc component :cleaner (start-cleaner (:spec db))) | |
component)) | |
(stop [component] | |
(when (:cleaner component) | |
(stop-cleaner (:cleaner component))) | |
(dissoc component :cleaner))) | |
(defn session-cleaner-component [] | |
(map->SessionCleaner {})) |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment