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

@ -3,6 +3,7 @@
<head> <head>
<meta charset="UTF-8"> <meta charset="UTF-8">
<meta name="mobile-web-app-capable" content="yes"> <meta name="mobile-web-app-capable" content="yes">
<meta name="viewport" content="width=device-width, initial-scale=1, user-scalable=yes">
<link rel="apple-touch-icon" sizes="57x57" href="{{{faviconBase}}}/apple-icon-57x57.png"> <link rel="apple-touch-icon" sizes="57x57" href="{{{faviconBase}}}/apple-icon-57x57.png">
<link rel="apple-touch-icon" sizes="60x60" href="{{{faviconBase}}}/apple-icon-60x60.png"> <link rel="apple-touch-icon" sizes="60x60" href="{{{faviconBase}}}/apple-icon-60x60.png">

View File

@ -17,7 +17,7 @@ import Util.Size
view : Flags -> Model -> Html Msg view : Flags -> Model -> Html Msg
view flags model = view flags model =
div [ class "collectivesetting-page ui padded grid" ] 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" ] [ h4 [ class "ui top attached ablue-comp header" ]
[ text "Collective" [ 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 "" ] [ div [ class "" ]
(case model.currentTab of (case model.currentTab of
Just SourceTab -> Just SourceTab ->

View File

@ -13,7 +13,8 @@ view flags model =
div [ class "login-page" ] div [ class "login-page" ]
[ div [ class "ui centered grid" ] [ div [ class "ui centered grid" ]
[ div [ class "row" ] [ div [ class "row" ]
[ div [ class "six wide column ui segment login-view" ] [ div [ class "sixteen wide mobile twelve wide tablet six wide computer column" ]
[ div [ class "ui segment login-view" ]
[ h1 [ class "ui center aligned icon header" ] [ h1 [ class "ui center aligned icon header" ]
[ img [ img
[ class "ui image" [ class "ui image"
@ -77,6 +78,7 @@ view flags model =
] ]
] ]
] ]
]
resultMessage : Model -> Html Msg resultMessage : Model -> Html Msg

View File

@ -14,7 +14,7 @@ import Util.Html exposing (classActive)
view : Model -> Html Msg view : Model -> Html Msg
view model = view model =
div [ class "managedata-page ui padded grid" ] div [ class "managedata-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" ] [ h4 [ class "ui top attached ablue-comp header" ]
[ text "Manage Data" [ text "Manage Data"
] ]
@ -51,7 +51,7 @@ view model =
] ]
] ]
] ]
, div [ class "twelve wide column" ] , div [ class "sixteen wide mobile twelve wide tablet twelve wide computer column" ]
[ div [ class "" ] [ div [ class "" ]
(case model.currentTab of (case model.currentTab of
Just TagTab -> Just TagTab ->

View File

@ -12,7 +12,7 @@ view flags model =
div [ class "newinvite-page" ] div [ class "newinvite-page" ]
[ div [ class "ui centered grid" ] [ div [ class "ui centered grid" ]
[ div [ class "row" ] [ div [ class "row" ]
[ div [ class "eight wide column ui segment newinvite-view" ] [ div [ class "sixteen wide mobile fourteen wide tablet eight wide computer column" ]
[ h1 [ class "ui cener aligned icon header" ] [ h1 [ class "ui cener aligned icon header" ]
[ img [ img
[ class "ui image" [ class "ui image"

View File

@ -13,7 +13,7 @@ view flags model =
div [ class "register-page" ] div [ class "register-page" ]
[ div [ class "ui centered grid" ] [ div [ class "ui centered grid" ]
[ div [ class "row" ] [ div [ class "row" ]
[ div [ class "six wide column ui segment register-view" ] [ div [ class "sixteen wide mobile twelve wide tablet six wide computer column" ]
[ h1 [ class "ui cener aligned icon header" ] [ h1 [ class "ui cener aligned icon header" ]
[ img [ img
[ class "ui image" [ class "ui image"

View File

@ -13,7 +13,7 @@ import Util.Html exposing (classActive)
view : Model -> Html Msg view : Model -> Html Msg
view model = view model =
div [ class "usersetting-page ui padded grid" ] div [ class "usersetting-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" ] [ h4 [ class "ui top attached ablue-comp header" ]
[ text "User" [ text "User"
] ]
@ -25,7 +25,7 @@ view model =
] ]
] ]
] ]
, div [ class "twelve wide column" ] , div [ class "sixteen wide mobile twelve wide tablet twelve wide computer column" ]
[ div [ class "" ] [ div [ class "" ]
(case model.currentTab of (case model.currentTab of
Just ChangePassTab -> Just ChangePassTab ->