diff --git a/serversession-backend-acid-state/src/Web/ServerSession/Backend/Acid.hs b/serversession-backend-acid-state/src/Web/ServerSession/Backend/Acid.hs
index 8447630..e19f914 100644
--- 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(..)