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

Add guidance to Select example

Browse Source
This commit is contained in:
Tessa Kelly 2021-11-11 14:07:02 -08:00
parent 74fb1f04c1
commit 5b01699c6b
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
styleguide-app/Examples/Select.elm
View File

@ -162,6 +162,16 @@ initControls =
)
(Control.string "The right item must be selected.")
)
|> ControlExtra.optionalListItem "guidance"
(Control.map
(\str ->
( "Select.guidance \"" ++ str ++ "\""
, Select.guidance str
)
)
<|
Control.string "The right item must be selected."
)
initChoices : Control ( String, List (Choice String) )