guix
/
guix-cuirass
mirror of git://git.savannah.gnu.org/guix/guix-cuirass.git
2
0
Fork 0
Code Issues Releases Wiki Activity

Fix display glitches. 

* src/cuirass/templates.scm (specifications-table): Fix glitches.
* src/static/css/cuirass.css (job-val): New section.
* doc/cuirass.texi: Update it.
This commit is contained in:
Mathieu Othacehe 2021-04-08 15:42:07 +02:00
parent 152f7a6884
commit d3d1f384a4
No known key found for this signature in database
GPG Key ID: 8354763531769CA6
3 changed files with 19 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
doc/cuirass.texi
View File

@ -1117,8 +1117,9 @@ This integer field references the evaluation identifier from the
@code{Evaluations} table, indicating to which evaluation this job @code{Evaluations} table, indicating to which evaluation this job
belongs. belongs.
@item derivation @item builds
This text field holds the absolute name of the job derivation file. This integer field references the build id from the @code{Builds}
table, corresponding to this job.
@item system @item system
This text field holds the system name of the derivation. This text field holds the system name of the derivation.

23
src/cuirass/templates.scm
View File

@ -331,14 +331,13 @@ $('.job-toggle').click(function() {
(specification-name spec)))) (specification-name spec))))
(if summary (if summary
`((div `((div
(@ (class "badge badge-success job-per") (@ (class "badge badge-success job-per mr-3")
(title "Percentage succeeded")) (title "Percentage succeeded"))
,(format #f "~1,2f%" ,(format #f "~1,2f%"
(assq-ref summary #:percentage))) (assq-ref summary #:percentage)))
" " " "
(div (div
(@ (class "job-val") (@ (class "job-val"))
(style "display:none"))
(div (div
(@ (class "badge badge-success") (@ (class "badge badge-success")
(title "Succeeded")) (title "Succeeded"))
@ -353,16 +352,18 @@ $('.job-toggle').click(function() {
,(assq-ref summary #:scheduled)))) ,(assq-ref summary #:scheduled))))
'()))) '())))
(td (td
,(let ((eval (and=> (spec-summary ,@(let ((eval (and=> (spec-summary
(specification-name spec)) (specification-name spec))
(cut assq-ref <> #:evaluation)))) (cut assq-ref <> #:evaluation))))
`(a (@ (href "/eval/" ,eval (if eval
"/dashboard")) `((a (@ (href "/eval/" ,eval
(div "/dashboard"))
(@ (class "oi oi-monitor d-inline-block ml-2") (div
(title "Dashboard") (@ (class "oi oi-monitor d-inline-block ml-2")
(aria-hidden "true")) (title "Dashboard")
""))) (aria-hidden "true"))
"")))
'()))
(div (div
(@ (class "dropdown d-inline-block ml-2")) (@ (class "dropdown d-inline-block ml-2"))
(a (@ (class "oi oi-menu dropdown-toggle no-dropdown-arrow") (a (@ (class "oi oi-menu dropdown-toggle no-dropdown-arrow")

4
src/static/css/cuirass.css
View File

@ -92,3 +92,7 @@ div.tooltip {
max-width: 1000px; max-width: 1000px;
height: 30px; height: 30px;
} }
.job-val {
display: none;
}