robur/builder-web
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Views: Removed old code

Browse source
This commit is contained in:
rand00 2021-12-13 18:03:01 +01:00 committed by Reynir Björnsson
parent 4e2d069b26
commit c9ab07832e
1 changed files with 0 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lib/views.ml
View file

@ -361,10 +361,6 @@ let job_build
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: 50em; height: 50.5em" 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 [
* let src = Fmt.str "/job/%s/build/%a/treemap" name Uuidm.pp uuid in
* img ~src ~alt:"Binary dissection" ()
* ]; *)
h3 [txt "Build info"]; h3 [txt "Build info"];
ul [ ul [
li [ a ~a:[Fmt.kstr a_href "/job/%s/build/%a/console" name Uuidm.pp uuid] li [ a ~a:[Fmt.kstr a_href "/job/%s/build/%a/console" name Uuidm.pp uuid]