all repos

onasty @ d0434ef834793fb7b8afd5e4e55d3fd01b6ffb50

a one-time notes service

onasty/web/src/Pages/NotFound_.elm(view raw) 

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
 
module Pages.NotFound_ exposing (Model, Msg, page)

import Effect
import Html as H
import Html.Attributes as A
import Layouts
import Page exposing (Page)
import Route exposing (Route)
import Shared
import View exposing (View)


type alias Model =
    {}


type alias Msg =
    ()


page : Shared.Model -> Route () -> Page Model Msg
page _ _ =
    Page.new
        { init = \_ -> ( {}, Effect.none )
        , update = \_ _ -> ( {}, Effect.none )
        , subscriptions = \_ -> Sub.none
        , view = view
        }
        |> Page.withLayout Layouts.Header


view : Model -> View Msg
view _ =
    { title = "404"
    , body = [ H.div [ A.class "py-8 mx-auto w-64" ] [ H.text "Page not found" ] ]
    }