From c1bea25186b14d5dd1caf1a2d2b1a8c82601a7c0 Mon Sep 17 00:00:00 2001 From: Adam Sandberg Ericsson Date: Fri, 4 Feb 2022 09:03:15 +0000 Subject: [PATCH] add some css to make make a really wide Detailed table render with fewer horizontal scrollbars When viewing -hi profiles the table can get really wide and the max-width set by the stylesheet makes for a really bad experience. --- src/Eventlog/HtmlTemplate.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Eventlog/HtmlTemplate.hs b/src/Eventlog/HtmlTemplate.hs index c8941a9..2207334 100644 --- a/src/Eventlog/HtmlTemplate.hs +++ b/src/Eventlog/HtmlTemplate.hs @@ -115,7 +115,7 @@ template :: Header -> Value -> Maybe Value -> Maybe Html -> Args -> Html template header' dat cc_descs closure_descs as = docTypeHtml $ do H.stringComment $ "Generated with eventlog2html-" <> showVersion version htmlHeader dat cc_descs as - body $ H.div ! class_ "container" $ do + body $ H.div ! class_ "container" ! A.style "width: fit-content; max-width: 99%;" $ do H.div ! class_ "row" $ do H.div ! class_ "column" $ do h1 $ a ! href "https://mpickering.github.io/eventlog2html" $ "eventlog2html"