Orasund/elm-ui-widgets
1
1
Fork 0
mirror of https://github.com/Orasund/elm-ui-widgets.git synced 2024-11-22 04:58:49 +03:00
Code Issues Projects Releases Wiki Activity

close expanded items automatically.

Browse Source
This commit is contained in:
Lucas Payr 2021-06-03 13:07:15 +02:00
parent 852820cb39
commit 70f2c024f1
1 changed files with 10 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
explorer/src/UIExplorer.elm
View File

@ -587,16 +587,21 @@ updateSuccess (PageBuilder pages) config msg model =
)
PressedPageSizeOption pageSizeOption ->
( { model | pageSizeOption = pageSizeOption }, Cmd.none )
( { model | pageSizeOption = pageSizeOption
, expandPageSizeOptions = False }, Cmd.none )
ToggledPageSizeGroup ->
( { model | expandPageSizeOptions = not model.expandPageSizeOptions }, Cmd.none )
( { model | expandPageSizeOptions = not model.expandPageSizeOptions
, expandColorBlindOptions = False
}, Cmd.none )
PressedColorBlindOption colorBlindOption ->
( { model | colorBlindOption = colorBlindOption }, Cmd.none )
( { model | colorBlindOption = colorBlindOption
, expandColorBlindOptions = False}, Cmd.none )
ToggledColorBlindGroup ->
( { model | expandColorBlindOptions = not model.expandColorBlindOptions }, Cmd.none )
( { model | expandColorBlindOptions = not model.expandColorBlindOptions
, expandPageSizeOptions = False }, Cmd.none )
ChangeDarkTheme enabled ->
( { model | darkThemeEnabled = enabled }, Cmd.none )
@ -796,7 +801,7 @@ viewSidebar pages config model =
[ config.sidebarTitle, minimizeSidebarButton ]
|> Widget.asItem
, Widget.fullBleedItem (Material.fullBleedItem palette)
{ text = "dark theme"
{ text = "Dark Theme"
, onPress = Just <| ChangeDarkTheme <| not <| model.darkThemeEnabled
, icon =
\{} ->