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

Add Semantic UI Theme (#21)

Browse Source
This commit is contained in:
Lucas Payr 2020-08-19 12:28:48 +02:00
parent 8010f56150
commit 8f624b5e2b
2 changed files with 17 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
example/src/Data/Style/SemanticUI.elm
View File

@ -7,10 +7,24 @@ import Element.Border as Border
import Element.Font as Font
import Html
import Html.Attributes as Attributes
import Widget.Style exposing (ButtonStyle, ColumnStyle, DialogStyle, ExpansionPanelStyle, LayoutStyle, ProgressIndicatorStyle, RowStyle, TabStyle, TextInputStyle)
import Widget.Style exposing (ButtonStyle, ColumnStyle, DialogStyle, ExpansionPanelStyle, LayoutStyle, ProgressIndicatorStyle, RowStyle, SortTableStyle, TabStyle, TextInputStyle)
import Widget.Style.Template as Template
sortTable : SortTableStyle msg
sortTable =
{ containerTable = [ Attributes.class "ui celled table" |> Element.htmlAttribute ]
, headerButton = button
, ascIcon =
Html.i [ Attributes.class "dropdown icon" ] []
|> Element.html
, descIcon =
Html.i [ Attributes.class "dropdown icon" ] []
|> Element.html
, defaultIcon = Element.none
}
button : ButtonStyle msg
button =
{ container =
@ -248,7 +262,7 @@ layout =
style : Style msg
style =
{ sortTable = Template.sortTable <| "sortTable"
{ sortTable = sortTable
, row = row
, buttonRow = buttonRow
, cardColumn = cardColumn

2
example/src/Main.elm
View File

@ -106,7 +106,7 @@ initialModel { viewport } =
, current = ""
, remaining = 0
}
, theme = SemanticUI --Material
, theme = Material
, expanded = AnySet.empty Example.toString
}
, [ cmd