cerchez07/elm-0.19-workshop
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix VerifyWorkshopSetup.

Browse Source
This commit is contained in:
Richard Feldman
2018-05-01 20:57:47 -04:00
parent a9ff651ebd
commit 783d9301c1
1 changed files with 42 additions and 28 deletions
Download Patch File Download Diff File Expand all files Collapse all files

70
VerifyWorkshopSetup.elm
View File

@@ -1,4 +1,4 @@
module VerifyWorkshopSetup exposing (main) port module Main exposing (..)
{- | Displays “You’re all set!” and a heart in the style of the Elm logo (created {- | Displays “You’re all set!” and a heart in the style of the Elm logo (created
by Marco Perone, CC-BY-SA-4.0 - thanks for sharing it, Marco!) by Marco Perone, CC-BY-SA-4.0 - thanks for sharing it, Marco!)
@@ -9,33 +9,47 @@ module VerifyWorkshopSetup exposing (main)
import Html exposing (Html, h1, img, section, text) import Html exposing (Html, h1, img, section, text)
import Html.Attributes exposing (alt, src, style) import Html.Attributes exposing (alt, src, style)
import Json.Decode exposing (Value)
main : Html msg port storeSession : Maybe String -> Cmd msg
port onSessionChange : (Value -> msg) -> Sub msg
main : Program Value () ()
main = main =
section Html.programWithFlags
[ style { init = \_ -> ( (), Cmd.none )
[ ( "margin", "40px auto" ) , update = \() () -> ( (), Cmd.none )
, ( "width", "960px" ) , subscriptions = \() -> Sub.none
, ( "text-align", "center" ) , view =
] \() ->
] section
[ h1 [ style
[ style [ ( "margin", "40px auto" )
[ ( "margin", "40px auto" ) , ( "width", "960px" )
, ( "font-family", "Helvetica, Arial, sans-serif" ) , ( "text-align", "center" )
, ( "font-size", "128px" ) ]
, ( "color", "rgb(90, 99, 120)" ) ]
] [ h1
] [ style
[ text "You’re all set!" ] [ ( "margin", "40px auto" )
, img , ( "font-family", "Helvetica, Arial, sans-serif" )
[ alt "Heart in the style of the Elm logo, by Marco Perone" , ( "font-size", "128px" )
, src "https://user-images.githubusercontent.com/1094080/39399444-a90f2746-4aeb-11e8-9bd6-4fe45e535921.png" , ( "color", "rgb(90, 99, 120)" )
, style ]
[ ( "width", "368px" ) ]
, ( "height", "305px" ) [ text "You’re all set!" ]
] , img
] [ alt "Heart in the style of the Elm logo, by Marco Perone"
[] , src "https://user-images.githubusercontent.com/1094080/39399444-a90f2746-4aeb-11e8-9bd6-4fe45e535921.png"
] , style
[ ( "width", "368px" )
, ( "height", "305px" )
]
]
[]
]
}