Fix ugliness in Chrome

Now there's different ugliness!

Ref. #9

src/View.hs

@@ -149,6 +149,8 @@ wrapPage :: Text -> HtmlT IO () -> HtmlT IO ()
 wrapPage pageTitle page = doctypehtml_ $ do
   head_ $ do
     title_ (toHtml pageTitle)
+    meta_ [name_ "viewport",
+           content_ "width=device-width, initial-scale=1.0, user-scalable=yes"]
     let cdnjs = "https://cdnjs.cloudflare.com/ajax/libs/"
     includeJS (cdnjs <> "jquery/2.2.0/jquery.min.js")
     -- See Note [autosize]