Views: Chosen a static width relative to textsize for treemap

This commit is contained in:
rand00 2021-12-13 17:49:33 +01:00 committed by Reynir Björnsson
parent b52e3bc0b0
commit 4e2d069b26

View file

@ -359,7 +359,7 @@ let job_build
h3 [txt "Analysis"]; h3 [txt "Analysis"];
p [ p [
let src = Fmt.str "/job/%s/build/%a/treemap" name Uuidm.pp uuid in let src = Fmt.str "/job/%s/build/%a/treemap" name Uuidm.pp uuid in
let style = "width: 35vw; height: 35.5vw" in (*treemap tries to be square*) let style = "width: 50em; height: 50.5em" in (*treemap tries to be square*)
iframe ~a:[ a_src src; a_title "Binary dissection"; a_style style ] [] ]; iframe ~a:[ a_src src; a_title "Binary dissection"; a_style style ] [] ];
(* p [ (* p [
* let src = Fmt.str "/job/%s/build/%a/treemap" name Uuidm.pp uuid in * let src = Fmt.str "/job/%s/build/%a/treemap" name Uuidm.pp uuid in