From 84f53fac431df20afd54817cca14260f1202e9ff Mon Sep 17 00:00:00 2001
From: Joris
Date: Thu, 31 Mar 2016 18:02:35 +0200
Subject: Add viewport

---
 src/server/View/Page.hs | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/server/View')

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