diff options
| -rw-r--r-- | guix-qa-frontpage/view/issue.scm | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/guix-qa-frontpage/view/issue.scm b/guix-qa-frontpage/view/issue.scm index f1e5f6c..ae569e5 100644 --- a/guix-qa-frontpage/view/issue.scm +++ b/guix-qa-frontpage/view/issue.scm @@ -181,7 +181,9 @@ td.bad { (th)) (tr (th (@ (colspan 4)) "Base") - (th (@ (colspan 4)) "With patches applied") + (th (@ (colspan 4) + (style "border-left-width: 0.1em; border-left-style: solid; border-left-color: black")) + "With patches applied") (th)) (tr ,@(let ((header-style @@ -194,7 +196,10 @@ td.bad { "Blocked") (th (@ (style ,header-style)) "Unknown") - (th (@ (style ,header-style)) + (th (@ (style + ,(string-append + header-style + " border-left-width: 0.125em; border-left-style: solid; border-left-color: black;"))) "Succeeding") (th (@ (style ,header-style)) "Failing") |