Fix mobile support

Next to the missing css classs, the viewport definition was missing in
the html.
This commit is contained in:
Eike Kettner
2020-05-17 23:20:52 +02:00
parent f5c23ceb3d
commit cece5b6193
7 changed files with 64 additions and 61 deletions

View File

@ -17,7 +17,7 @@ import Util.Size
view : Flags -> Model -> Html Msg
view flags model =
div [ class "collectivesetting-page ui padded grid" ]
[ div [ class "four wide column" ]
[ div [ class "sixteen wide mobile four wide tablet four wide computer column" ]
[ h4 [ class "ui top attached ablue-comp header" ]
[ text "Collective"
]
@ -54,7 +54,7 @@ view flags model =
]
]
]
, div [ class "twelve wide column" ]
, div [ class "sixteen wide mobile twelve wide tablet twelve wide computer column" ]
[ div [ class "" ]
(case model.currentTab of
Just SourceTab ->