mirror of
https://github.com/tahoe-lafs/tahoe-lafs.git
synced 2024-12-24 15:16:41 +00:00
misc/coverage.el: improve filename matching
This commit is contained in:
parent
1de4d2c594
commit
625ad78877
@ -45,7 +45,7 @@
|
|||||||
|
|
||||||
(defun coverage-annotate (show-code)
|
(defun coverage-annotate (show-code)
|
||||||
(let ((allcoverage (load-coverage-annotations))
|
(let ((allcoverage (load-coverage-annotations))
|
||||||
(filename-key buffer-file-truename)
|
(filename-key (expand-file-name buffer-file-truename))
|
||||||
thiscoverage code-lines covered-lines uncovered-code-lines
|
thiscoverage code-lines covered-lines uncovered-code-lines
|
||||||
)
|
)
|
||||||
(while (and (not (gethash filename-key allcoverage nil))
|
(while (and (not (gethash filename-key allcoverage nil))
|
||||||
|
Loading…
Reference in New Issue
Block a user