module Pages.About exposing (Params, Model, Msg, page) import Html exposing (Html, button, div, h2, h5, img, text, ul, li, a, p, span, i) import Html.Attributes exposing (src, style, class, alt, href) import Spa.Document exposing (Document) import Spa.Page as Page exposing (Page) import Spa.Url as Url exposing (Url) page : Page Params Model Msg page = Page.static { view = view } type alias Model = Url Params type alias Msg = Never -- VIEW type alias Params = () view : Url Params -> Document Msg view { params } = let elm_link = a [ href "https://elm-lang.org/" ] [ text "Elm" ] coopcloud_link = a [ href "https://coopcloud.tech/" ] [ text "Co-op Cloud" ] source_link = a [ href "https://git.coopcloud.tech/coop-cloud/abra-apps" ] [ text "source" ] in { title = "about – abra recipes" , body = [ div [ class "pt-3" ] [ div [ class "col-md-6 col-sm-10 mb-3 offset-md-3 offset-sm-1" ] [ div [ class "card" ] [ div [ class "card-header" ] [ h2 [] [ text "abra recipes" ] ] , div [ class "card-body" ] [ p [] [ text "a lil' " , text " tool to display " , coopcloud_link , text " apps." ] , p [] [ text "written in " , elm_link , text " for some reason 🤷" ] ] , div [ class "card-footer" ] [ p [] [ text "by @3wc (" , source_link , text ")" ] ] ] ] ] ] }