Commit cfbd1255 authored by Hong Xu's avatar Hong Xu Committed by Lars Ingebrigtsen

tags-complete-tags-table-file doc string fix

* lisp/progmodes/etags.el (tags-complete-tags-table-file): Doc
string fix (bug#37538).
parent 273dd654
Pipeline #3485 failed with stage
in 54 minutes and 12 seconds
......@@ -1843,13 +1843,18 @@ For non-interactive use, superceded by `fileloop-initialize-replace'."
delimited)
(fileloop-continue))
(defun tags-complete-tags-table-file (string predicate what) ; Doc string?
(defun tags-complete-tags-table-file (string predicate what)
"Complete STRING from file names in the current tags table.
The meaning of the arguments are the same as the function form of
COLLECTION as explained in Info node `(elisp) Programmed
Completion', except that if WHAT does not equal t, it is treated
as if it were nil."
(save-excursion
;; If we need to ask for the tag table, allow that.
(let ((enable-recursive-minibuffers t))
(visit-tags-table-buffer))
(if (eq what t)
(all-completions string (tags-table-files) predicate)
(all-completions string (tags-table-files) predicate)
(try-completion string (tags-table-files) predicate))))
(defun tags--get-current-buffer-name-in-tags-file ()
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment