namespace Aamukampa.Web.Views

open System
open Falco.Markup
open Elem
open Attr
open Text
open Aamukampa.Core

module Document =
    let view documentBody =
        html [ lang "fi" ] [
            head [] [ 
                meta [ charset "utf-8" ]
                meta [ name "viewport"; content "width=device-width" ]
                Elem.title [] [ raw "Aamukampa" ]
                link [ rel "stylesheet"; href (sprintf "%s%s" Config.pathBase "styles.css") ]
                script [ type' "module"; src (sprintf "%s%s" Config.pathBase "app.js") ] [] 
                ]
            body [] [
                documentBody
            ]
        ]