dillonkearns/elm-pages-v3-beta
1
1
Fork 0
mirror of https://github.com/dillonkearns/elm-pages-v3-beta.git synced 2024-11-24 06:54:03 +03:00
Code Issues Packages Projects Releases Wiki Activity

Extract secrets in helper to single definition.

Browse Source
This commit is contained in:
Dillon Kearns 2022-12-21 08:46:04 -08:00
parent 23f32f8cce
commit 94a37fe51f
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
examples/end-to-end/src/MySession.elm
View File

@ -24,7 +24,7 @@ withSession :
withSession =
Session.withSession
{ name = "mysession"
, secrets = Env.expect "SESSION_SECRET" |> DataSource.map List.singleton
, secrets = secrets
, options = cookieOptions
}
@ -36,7 +36,7 @@ withSessionOrRedirect :
withSessionOrRedirect toRequest handler =
Session.withSession
{ name = "mysession"
, secrets = Env.expect "SESSION_SECRET" |> DataSource.map List.singleton
, secrets = secrets
, options = cookieOptions
}
(\request sessionResult ->
@ -52,6 +52,11 @@ withSessionOrRedirect toRequest handler =
handler
secrets : DataSource (List String)
secrets =
Env.expect "SESSION_SECRET" |> DataSource.map List.singleton
expectSessionOrRedirect :
(request -> Session.Session -> DataSource ( Session.Session, Response data errorPage ))
-> Parser request
@ -59,7 +64,7 @@ expectSessionOrRedirect :
expectSessionOrRedirect toRequest handler =
Session.withSession
{ name = "mysession"
, secrets = Env.expect "SESSION_SECRET" |> DataSource.map List.singleton
, secrets = secrets
, options = cookieOptions
}
(\request sessionResult ->