Remove duplicate html tag

dmjio · Jul 6, 2018 · 9378329 · 9378329
1 parent 0ad4d97
commit 9378329
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/examples/haskell-miso.org/server/Main.hs b/examples/haskell-miso.org/server/Main.hs
@@ -88,8 +88,8 @@ handle404 _ respond = respond $ responseLBS
 
 instance L.ToHtml a => L.ToHtml (Wrapper a) where
   toHtmlRaw = L.toHtml
-  toHtml (Wrapper x) =
-    L.doctypehtml_ $ do
+  toHtml (Wrapper x) = do
+      L.doctype_
       L.html_ [ L.lang_ "en" ] $ do
         L.head_ $ do
           L.title_ "Miso: A tasty Haskell front-end framework"