aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDmitry Gutov2023-02-09 21:57:18 +0200
committerDmitry Gutov2023-02-19 19:01:33 +0200
commita5b5f73d886f07c385e5742308e1b59f4f77b9a5 (patch)
tree73a97cf0a9735d0627dfba75480809cdc88df348
parent6b908773599643657c58339966ef7779f813b687 (diff)
downloademacs-a5b5f73d886f07c385e5742308e1b59f4f77b9a5.tar.gz
emacs-a5b5f73d886f07c385e5742308e1b59f4f77b9a5.zip
xref--insert-xrefs: Use 'shadow' for the line number colon
* 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)
-rw-r--r--lisp/progmodes/xref.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/progmodes/xref.el b/lisp/progmodes/xref.el
index 63e065e696e..581eda0513e 100644
--- a/lisp/progmodes/xref.el
+++ b/lisp/progmodes/xref.el
@@ -1126,7 +1126,9 @@ GROUP is a string for decoration purposes and XREF is an
1126 maximize (xref-location-line 1126 maximize (xref-location-line
1127 (xref-item-location xref))) 1127 (xref-item-location xref)))
1128 for line-format = (and max-line 1128 for line-format = (and max-line
1129 (format "%%%dd:" (1+ (floor (log max-line 10))))) 1129 (format
1130 #("%%%dd:" 0 4 (face xref-line-number) 5 6 (face shadow))
1131 (1+ (floor (log max-line 10)))))
1130 with item-text-props = (list 'mouse-face 'highlight 1132 with item-text-props = (list 'mouse-face 'highlight
1131 'keymap xref--button-map 1133 'keymap xref--button-map
1132 'help-echo 1134 'help-echo
@@ -1146,8 +1148,7 @@ GROUP is a string for decoration purposes and XREF is an
1146 ((and (equal line prev-line) 1148 ((and (equal line prev-line)
1147 (equal prev-group group)) 1149 (equal prev-group group))
1148 "") 1150 "")
1149 (t (propertize (format line-format line) 1151 (t (format line-format line)))))
1150 'face 'xref-line-number)))))
1151 ;; Render multiple matches on the same line, together. 1152 ;; Render multiple matches on the same line, together.
1152 (when (and (equal prev-group group) 1153 (when (and (equal prev-group group)
1153 (or (null line) 1154 (or (null line)