Update part12
This commit is contained in:
24
part12/Stylesheets.elm
Normal file
24
part12/Stylesheets.elm
Normal file
@@ -0,0 +1,24 @@
|
||||
port module Stylesheets exposing (..)
|
||||
|
||||
import Css.File exposing (..)
|
||||
import ElmHubCss
|
||||
import Html exposing (div)
|
||||
import Html.App as Html
|
||||
|
||||
|
||||
port files : CssFileStructure -> Cmd msg
|
||||
|
||||
|
||||
cssFiles : CssFileStructure
|
||||
cssFiles =
|
||||
toFileStructure [ ( "style.css", compile [ ElmHubCss.css ] ) ]
|
||||
|
||||
|
||||
main : Program Never
|
||||
main =
|
||||
Html.program
|
||||
{ init = ( (), files cssFiles )
|
||||
, view = \_ -> (div [] [])
|
||||
, update = \_ _ -> ( (), Cmd.none )
|
||||
, subscriptions = \_ -> Sub.none
|
||||
}
|
||||
Reference in New Issue
Block a user