aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDmitry Gutov2020-12-05 02:52:39 +0200
committerDmitry Gutov2020-12-05 03:01:34 +0200
commit940bb6e984e80a933af80984556bebb31d2cdfd3 (patch)
treef119271aa66d3327dbe1a7db9d8e54818a6e0bcc
parent2945fe74a9fcb09c5fa832ae678d0d7f0b2bb448 (diff)
downloademacs-940bb6e984e80a933af80984556bebb31d2cdfd3.tar.gz
emacs-940bb6e984e80a933af80984556bebb31d2cdfd3.zip
Fontify the group and the line number
* lisp/progmodes/xref.el (xref--show-defs-minibuffer): Fontify the group and the line number.
-rw-r--r--lisp/progmodes/xref.el11
1 files changed, 9 insertions, 2 deletions
diff --git a/lisp/progmodes/xref.el b/lisp/progmodes/xref.el
index e304a7beae2..a78fed282cf 100644
--- a/lisp/progmodes/xref.el
+++ b/lisp/progmodes/xref.el
@@ -951,8 +951,15 @@ local keymap that binds `RET' to `xref-quit-and-goto-xref'."
951 (cl-loop for (xref . more2) on xrefs do 951 (cl-loop for (xref . more2) on xrefs do
952 (with-slots (summary location) xref 952 (with-slots (summary location) xref
953 (let* ((line (xref-location-line location)) 953 (let* ((line (xref-location-line location))
954 (line-fmt (if line (format "%s:" line) "")) 954 (line-fmt
955 (group-fmt (substring group group-prefix-length)) 955 (if line
956 (format #("%d:" 0 2 (face xref-line-number))
957 line)
958 ""))
959 (group-fmt
960 (propertize
961 (substring group group-prefix-length)
962 'face 'xref-file-header))
956 (candidate 963 (candidate
957 (if show-summary 964 (if show-summary
958 (format "%s:%s%s" group-fmt line-fmt summary) 965 (format "%s:%s%s" group-fmt line-fmt summary)