mirror of
https://gitlab.com/upRootNutrition/website.git
synced 2025-06-16 20:35:13 -05:00
feat: removed boilerplate
This commit is contained in:
parent
cb51b17c08
commit
a462c01f88
14 changed files with 277 additions and 378 deletions
30
frontend/src/Auth.elm
Executable file
30
frontend/src/Auth.elm
Executable file
|
@ -0,0 +1,30 @@
|
|||
module Auth exposing (User, onPageLoad, viewLoadingPage)
|
||||
|
||||
import Auth.Action
|
||||
import Dict
|
||||
import Route exposing (Route)
|
||||
import Route.Path
|
||||
import Shared
|
||||
import View exposing (View)
|
||||
|
||||
|
||||
type alias User =
|
||||
{}
|
||||
|
||||
|
||||
{-| Called before an auth-only page is loaded.
|
||||
-}
|
||||
onPageLoad : Shared.Model -> Route () -> Auth.Action.Action User
|
||||
onPageLoad shared route =
|
||||
Auth.Action.pushRoute
|
||||
{ path = Route.Path.NotFound_
|
||||
, query = Dict.empty
|
||||
, hash = Nothing
|
||||
}
|
||||
|
||||
|
||||
{-| Renders whenever `Auth.Action.showLoadingPage` is returned from `onPageLoad`.
|
||||
-}
|
||||
viewLoadingPage : Shared.Model -> Route () -> View Never
|
||||
viewLoadingPage shared route =
|
||||
View.fromString "Loading..."
|
Loading…
Add table
Add a link
Reference in a new issue