From f94b915e2f079eeaf3890bb08658f7c84dfc0773 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Fri, 10 Sep 2021 15:02:41 +0300 Subject: [PATCH] Doc string followup to last change. * lisp/progmodes/xref.el (xref-find-apropos): Mention 'tags-apropos-additional-actions' in the doc string. * lisp/progmodes/etags.el (tags-apropos-additional-actions): Mention 'xref-find-apropos' in the doc string. --- lisp/progmodes/etags.el | 7 ++++--- lisp/progmodes/xref.el | 4 +++- 2 files changed, 7 insertions(+), 4 deletions(-) diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el index 7efa88546d6..cddf3ba0b98 100644 --- a/lisp/progmodes/etags.el +++ b/lisp/progmodes/etags.el @@ -158,11 +158,12 @@ Otherwise, `find-tag-default' is used." :version "21.1") (defcustom tags-apropos-additional-actions nil - "Specify additional actions for `tags-apropos'. + "Specify additional actions for `tags-apropos' and `xref-find-apropos'. If non-nil, value should be a list of triples (TITLE FUNCTION -TO-SEARCH). For each triple, `tags-apropos' processes TO-SEARCH and -lists tags from it. TO-SEARCH should be an alist, obarray, or symbol. +TO-SEARCH). For each triple, `tags-apropos' and `xref-find-apropos' +process TO-SEARCH and list tags from it. TO-SEARCH should be an alist, +obarray, or symbol. If it is a symbol, the symbol's value is used. TITLE, a string, is a title used to label the additional list of tags. FUNCTION is a function to call when a symbol is selected in the diff --git a/lisp/progmodes/xref.el b/lisp/progmodes/xref.el index 082da1e1b7a..9a0de5f449b 100644 --- a/lisp/progmodes/xref.el +++ b/lisp/progmodes/xref.el @@ -1445,7 +1445,9 @@ This command is intended to be bound to a mouse event." ;;;###autoload (defun xref-find-apropos (pattern) "Find all meaningful symbols that match PATTERN. -The argument has the same meaning as in `apropos'." +The argument has the same meaning as in `apropos'. +See `tags-apropos-additional-actions' for how to augment the +output of this command when the backend is etags." (interactive (list (read-string "Search for pattern (word list or regexp): " nil 'xref--read-pattern-history -- 2.39.2