del: index.html
This commit is contained in:
File diff suppressed because it is too large
Load Diff
@@ -13,6 +13,7 @@ import Http
|
|||||||
import Json.Decode exposing (Decoder, int, string, succeed)
|
import Json.Decode exposing (Decoder, int, string, succeed)
|
||||||
import Json.Decode.Pipeline exposing (required)
|
import Json.Decode.Pipeline exposing (required)
|
||||||
import Json.Encode as Encode
|
import Json.Encode as Encode
|
||||||
|
import Html.Events exposing (onMouseOver)
|
||||||
|
|
||||||
|
|
||||||
type alias Form =
|
type alias Form =
|
||||||
@@ -286,6 +287,7 @@ formatButton position label state =
|
|||||||
, Border.widthEach borders
|
, Border.widthEach borders
|
||||||
, Border.color color.blue
|
, Border.color color.blue
|
||||||
, width (px 80)
|
, width (px 80)
|
||||||
|
, mouseOver [ Background.color color.lightBlue ]
|
||||||
, Background.color <|
|
, Background.color <|
|
||||||
if state == Input.Selected then
|
if state == Input.Selected then
|
||||||
color.lightBlue
|
color.lightBlue
|
||||||
@@ -370,6 +372,7 @@ view model =
|
|||||||
, Border.color color.darkBlue
|
, Border.color color.darkBlue
|
||||||
, paddingXY 32 16
|
, paddingXY 32 16
|
||||||
, Border.rounded 3
|
, Border.rounded 3
|
||||||
|
, mouseOver [ Background.color color.darkBlue ]
|
||||||
]
|
]
|
||||||
{ onPress = Just (PostForm model.form)
|
{ onPress = Just (PostForm model.form)
|
||||||
, label = Element.text "Download"
|
, label = Element.text "Download"
|
||||||
|
|||||||
Reference in New Issue
Block a user