Update part12

This commit is contained in:
Richard Feldman
2016-09-03 00:09:20 -07:00
parent cb13ef5ffb
commit d2f958151a
10 changed files with 555 additions and 12 deletions

24
part12/Stylesheets.elm Normal file
View 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
}