Adding categories to sidebar.
This commit is contained in:
parent
00c29418d7
commit
b5ccef5679
|
@ -304,11 +304,9 @@ viewApp app =
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
viewCategoryOption : (String, Category) -> Html Msg
|
viewCategories : (String, Category) -> Html msg
|
||||||
viewCategoryOption category =
|
viewCategories category =
|
||||||
option
|
div [] [text (Tuple.first category)]
|
||||||
[ value (categories.toString (Tuple.second category) ) ]
|
|
||||||
[ text (categories.toString (Tuple.second category) ) ]
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
@ -332,7 +330,9 @@ viewApps model =
|
||||||
|
|
||||||
Success ->
|
Success ->
|
||||||
div [ class "row justify-content-center" ]
|
div [ class "row justify-content-center" ]
|
||||||
[ div [ class "col-md-3" ] []
|
[ div [ class "col-md-3" ] [
|
||||||
|
div [] (List.map viewCategories categories.list)
|
||||||
|
]
|
||||||
, div [ class "col-md-6" ]
|
, div [ class "col-md-6" ]
|
||||||
[ div [ class "row" ]
|
[ div [ class "row" ]
|
||||||
[ div [ class "col-sm-12" ] [
|
[ div [ class "col-sm-12" ] [
|
||||||
|
|
Loading…
Reference in New Issue