Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Add type signature for getAcidState.

  • Loading branch information...
commit 2811df3eec210daa7d8b1339f3edfd387ec153b8 1 parent bf78a01
@mightybyte authored
Showing with 1 addition and 0 deletions.
  1. +1 −0  src/Snap/Snaplet/AcidState.hs
View
1  src/Snap/Snaplet/AcidState.hs
@@ -86,6 +86,7 @@ instance HasAcid (Acid st) st where
getAcidStore = id
+getAcidState :: forall a st. HasAcid a st => a -> AcidState st
getAcidState = _acidStore . getAcidStore
Please sign in to comment.
Something went wrong with that request. Please try again.