Spock-auth 0.1.0.0 → 0.2.0.0
raw patch · 2 files changed
+4/−4 lines, 2 filesdep ~Spock
Dependency ranges changed: Spock
Files
- Spock-auth.cabal +2/−2
- src/Web/Spock/Auth.hs +2/−2
Spock-auth.cabal view
@@ -1,5 +1,5 @@ name: Spock-auth-version: 0.1.0.0+version: 0.2.0.0 synopsis: Provides authentification helpers for Spock Homepage: https://github.com/agrafix/Spock-auth Bug-reports: https://github.com/agrafix/Spock-auth/issues@@ -15,7 +15,7 @@ hs-source-dirs: src exposed-modules: Web.Spock.Auth build-depends: base >= 4 && < 5,- Spock >=0.4.3.0,+ Spock ==0.5.*, text, http-types, time
src/Web/Spock/Auth.hs view
@@ -123,11 +123,11 @@ -> CheckRightsFun conn sess userId st user -> Http.StdMethod -> [UserRights]- -> RoutePattern+ -> T.Text -> (user -> SpockAction conn (VisitorSession sess userId) st ()) -> SpockM conn (VisitorSession sess userId) st () userRoute noAccessHandler loadUser checkRights reqTy requiredRights route action =- addroute reqTy route $+ defRoute reqTy route $ do sessData <- readSession case vs_type sessData of GuestSession ->