NoRedInk/noredink-ui
1
1
Fork 0
mirror of https://github.com/NoRedInk/noredink-ui.git synced 2024-11-24 00:42:29 +03:00
Code Issues Packages Projects Releases Wiki Activity

Adds search icon to the search input

Browse Source
This commit is contained in:
Tessa Kelly 2021-09-28 16:40:41 -07:00
parent de84d41b20
commit 311854fc56
1 changed files with 16 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
src/Nri/Ui/TextInput/V6.elm
View File

@ -45,10 +45,12 @@ import Html.Styled as Html exposing (..)
import Html.Styled.Attributes as Attributes exposing (..) import Html.Styled.Attributes as Attributes exposing (..)
import Html.Styled.Events as Events exposing (onInput) import Html.Styled.Events as Events exposing (onInput)
import Nri.Ui.ClickableSvg.V2 as ClickableSvg import Nri.Ui.ClickableSvg.V2 as ClickableSvg
import Nri.Ui.Colors.V1 as Colors
import Nri.Ui.Html.Attributes.V2 as Extra import Nri.Ui.Html.Attributes.V2 as Extra
import Nri.Ui.Html.V3 exposing (viewJust) import Nri.Ui.Html.V3 exposing (viewJust)
import Nri.Ui.InputStyles.V3 as InputStyles import Nri.Ui.InputStyles.V3 as InputStyles
import Nri.Ui.Message.V3 as Message import Nri.Ui.Message.V3 as Message
import Nri.Ui.Svg.V1 as Svg
import Nri.Ui.UiIcon.V1 as UiIcon import Nri.Ui.UiIcon.V1 as UiIcon
import Nri.Ui.Util exposing (dashify) import Nri.Ui.Util exposing (dashify)
@ -460,11 +462,20 @@ view_ label (InputType inputType) config currentValue =
++ extraStyles ++ extraStyles
) )
[ Html.text label ] [ Html.text label ]
, case ( config.onReset, stringValue ) of , case ( config.onReset, stringValue, inputType.fieldType ) of
( _, "" ) -> ( Just _, "", "search" ) ->
Html.text "" UiIcon.search
|> Svg.withWidth (Css.px 20)
|> Svg.withHeight (Css.px 20)
|> Svg.withColor Colors.gray75
|> Svg.withCss
[ Css.position Css.absolute
, Css.right (Css.px 10)
, Css.top (Css.px 22)
]
|> Svg.toHtml
( Just resetAction, _ ) -> ( Just resetAction, _, _ ) ->
ClickableSvg.button ("Reset " ++ label) ClickableSvg.button ("Reset " ++ label)
UiIcon.x UiIcon.x
[ ClickableSvg.onClick resetAction [ ClickableSvg.onClick resetAction
@ -477,7 +488,7 @@ view_ label (InputType inputType) config currentValue =
] ]
] ]
( Nothing, _ ) -> ( Nothing, _, _ ) ->
Html.text "" Html.text ""
, case errorMessage_ of , case errorMessage_ of
Just m -> Just m ->