]> git.eshelyaron.com Git - emacs.git/commitdiff
xref--insert-xrefs: Use 'shadow' for the line number colon
authorDmitry Gutov <dgutov@yandex.ru>
Thu, 9 Feb 2023 19:57:18 +0000 (21:57 +0200)
committerDmitry Gutov <dgutov@yandex.ru>
Sun, 19 Feb 2023 17:01:33 +0000 (19:01 +0200)
* lisp/progmodes/xref.el (xref--insert-xrefs): Use face 'shadow' for
the line number colon instead of continuing it face (bug#61340).

(cherry picked from commit d6d25a3c221e566de4df5319181e9ba9a8df285e)

lisp/progmodes/xref.el

index 63e065e696ed90774252ad9f19361545ad5e39be..581eda0513e32c3e48c9c09a6780fc690af29a75 100644 (file)
@@ -1126,7 +1126,9 @@ GROUP is a string for decoration purposes and XREF is an
                                    maximize (xref-location-line
                                              (xref-item-location xref)))
            for line-format = (and max-line
-                                  (format "%%%dd:" (1+ (floor (log max-line 10)))))
+                                  (format
+                                   #("%%%dd:" 0 4 (face xref-line-number) 5 6 (face shadow))
+                                   (1+ (floor (log max-line 10)))))
            with item-text-props = (list 'mouse-face 'highlight
                                         'keymap xref--button-map
                                         'help-echo
@@ -1146,8 +1148,7 @@ GROUP is a string for decoration purposes and XREF is an
                         ((and (equal line prev-line)
                               (equal prev-group group))
                          "")
-                        (t (propertize (format line-format line)
-                                       'face 'xref-line-number)))))
+                        (t (format line-format line)))))
                  ;; Render multiple matches on the same line, together.
                  (when (and (equal prev-group group)
                             (or (null line)