Fix example on how to use acid-state backend.

2015-05-28 01:27:40 -03:00 · 2015-05-28 01:27:40 -03:00 · 82b7ebdca4
commit 82b7ebdca4
parent b446b0ea92
1 changed files with 1 additions and 1 deletions
--- a/serversession-backend-acid-state/src/Web/ServerSession/Backend/Acid.hs
+++ b/serversession-backend-acid-state/src/Web/ServerSession/Backend/Acid.hs
@ -12,7 +12,7 @@
 -- withSessionStorage =
 --   bracket
 --     ('AcidStorage' \<$\> openLocalState 'emptyState')
--     createCheckpointAndClose
+--     (createCheckpointAndClose . 'acidState')
 -- @
 module Web.ServerSession.Backend.Acid
  ( AcidStorage(..)