From 84f53fac431df20afd54817cca14260f1202e9ff Mon Sep 17 00:00:00 2001 From: Joris Date: Thu, 31 Mar 2016 18:02:35 +0200 Subject: Add viewport --- src/client/elm/SignIn/View.elm | 2 -- src/server/View/Page.hs | 1 + 2 files changed, 1 insertion(+), 2 deletions(-) diff --git a/src/client/elm/SignIn/View.elm b/src/client/elm/SignIn/View.elm index 2269a4f..d81d63a 100644 --- a/src/client/elm/SignIn/View.elm +++ b/src/client/elm/SignIn/View.elm @@ -29,8 +29,6 @@ view address model signInModel = [ input [ value signInModel.login , on "input" targetValue (Signal.message address << UpdateSignIn << SignInAction.UpdateLogin) - , type' "text" - , autocomplete True , name "email" ] [] diff --git a/src/server/View/Page.hs b/src/server/View/Page.hs index 4108b99..33e32f7 100644 --- a/src/server/View/Page.hs +++ b/src/server/View/Page.hs @@ -28,6 +28,7 @@ page conf initResult = renderHtml . docTypeHtml $ do H.head $ do meta ! charset "UTF-8" + meta ! name "viewport" ! content "width=device-width, initial-scale=1, maximum-scale=1, user-scalable=0" H.title (toHtml $ getMessage SharedCost) script ! src "javascripts/client.js" $ "" jsonScript "messages" getTranslations -- cgit v1.2.3