suzanne.soy/cover
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge branch 'jsmaniac-master'

Browse Source
This commit is contained in:
Ryan Plessner 2015-08-25 19:33:40 -04:00
commit a3be761e13
2 changed files with 10 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
cover/private/html/assets/main.css
View File

@ -1,4 +1,5 @@
.code {
display: table;
font-family: "Lucida Console", Monaco, monospace;
}
@ -53,12 +54,17 @@ div.report-container {
}
div.line-numbers {
display: inline-block;
display: table-cell;
margin-right: 1em;
text-align: right;
}
div.file-lines {
display: inline-block;
display: table-cell;
}
div.lines-wrapper {
display: table-row;
}
/* Sorting Triangles */

4
cover/private/html/html.rkt
View File

@ -145,7 +145,7 @@
(define (file->html path covered?)
(define file (file->string path))
(define lines (string-split file "\n"))
`(div ()
`(div ([class "lines-wrapper"])
,(div:line-numbers (length lines))
,(div:file-lines lines covered?)))
@ -157,7 +157,7 @@
(define covered? (curry (get-test-coverage) f))
(define lines (string-split (file->string f) "\n"))
(check-equal? (file->html f covered?)
`(div ()
`(div ([class "lines-wrapper"])
,(div:line-numbers (length lines))
,(div:file-lines lines covered?))))))