module Page.{{name}} exposing (Model, Msg, init, subscriptions, toSession, update, view) {-| The login page. -} import Api exposing (Cred, login) import Browser.Navigation as Nav import Html exposing (..) import Html.Attributes exposing (..) import Html.Events exposing (..) import Http import Json.Decode as Decode exposing (Decoder, decodeString, field, string) import Json.Decode.Pipeline exposing (optional) import Json.Encode as Encode import Route exposing (Route) import Session exposing (Session(..), gotSessionAction) import Viewer exposing (Viewer, store) import Url exposing (Url) -- import Forms exposing (..) import Forms exposing (..) import Update.Extra as UE import Json exposing (..) import Helper exposing (..) import ListHelper exposing (..) -- MODEL type alias Model = {} init : Session -> ( Model, Cmd Msg ) init session = ( {} , Cmd.none ) -- VIEW view : Model -> { title : String, content : Html Msg } view model = { title = "" , content = div [] [] } -- UPDATE type Msg = NoOp update : Msg -> Model -> ( Model, Cmd Msg ) update msg model = case msg of NoOp -> ( model, Cmd.none ) -- SUBSCRIPTIONS subscriptions : Model -> Sub Msg subscriptions model = Session.changes GotSession (Session.navKey model.session) -- EXPORT toSession : Model -> Session toSession model = model.session