misc/coverage.el: improve filename matching

diff --git a/misc/coverage.el b/misc/coverage.el
index 64e7134e472137be9d1a6e4a8f54d89e8801da38..bad490fd66e069b17f31441b32b0cf09629430b7 100644 (file)
--- a/misc/coverage.el
+++ b/misc/coverage.el
@@ -45,7 +45,7 @@
 
 (defun coverage-annotate (show-code)
   (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
         )
     (while (and (not (gethash filename-key allcoverage nil))