Explicitly state that we're adding a dependency here
This commit is contained in:
parent
c24096be16
commit
160cda2602
1 changed files with 1 additions and 1 deletions
|
@ -281,7 +281,7 @@ lookupAccount key = case Map.lookup key database of
|
||||||
For generalized authentication, servant exposes the `AuthHandler` type,
|
For generalized authentication, servant exposes the `AuthHandler` type,
|
||||||
which is used to wrap the `Request -> Handler user` logic. Let's
|
which is used to wrap the `Request -> Handler user` logic. Let's
|
||||||
create a value of type `AuthHandler Request Account` using the above `lookupAccount`
|
create a value of type `AuthHandler Request Account` using the above `lookupAccount`
|
||||||
method:
|
method (note: we depend upon `cookie`'s `parseCookies` for this):
|
||||||
|
|
||||||
```haskell
|
```haskell
|
||||||
import Web.Cookie (parseCookies)
|
import Web.Cookie (parseCookies)
|
||||||
|
|
Loading…
Reference in a new issue