diff options
| author | Dmitry Gutov | 2020-12-05 02:52:39 +0200 |
|---|---|---|
| committer | Dmitry Gutov | 2020-12-05 03:01:34 +0200 |
| commit | 940bb6e984e80a933af80984556bebb31d2cdfd3 (patch) | |
| tree | f119271aa66d3327dbe1a7db9d8e54818a6e0bcc | |
| parent | 2945fe74a9fcb09c5fa832ae678d0d7f0b2bb448 (diff) | |
| download | emacs-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.el | 11 |
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) |