vbrandl/yagcdn
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Set focus on input on page load
All checks were successful
continuous-integration/drone/push Build is passing
Details

Browse Source
This commit is contained in:
Valentin Brandl
2019-08-11 16:40:45 +02:00
parent 387b6241a2
commit dfe012b4c9
1 changed files with 10 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
frontend/src/Main.elm
View File

@ -10,7 +10,7 @@ module Main exposing
import Browser
import Data exposing (Url, hostname, toUrl)
import Html exposing (Html, fieldset, input, label)
import Html.Attributes exposing (for, id, placeholder, readonly, style, value)
import Html.Attributes exposing (autofocus, for, id, placeholder, readonly, style, value)
import Html.Events exposing (onInput)
import Parse exposing (parseUrl)
@ -55,7 +55,15 @@ view : Model -> Html Msg
view state =
fieldset []
[ label [ for "url" ] []
, input (myStyle [ id "url", placeholder "GitHub/GitLab/Bitbucket URL", value state.url, onInput UrlChange ])
, input
(myStyle
[ id "url"
, placeholder "GitHub/GitLab/Bitbucket URL"
, value state.url
, onInput UrlChange
, autofocus True
]
)
[]
, label [ for "output" ] []
, input (myStyle [ id "output", readonly True, value (displayMUrl state.parsed) ]) []