# HG changeset patch # User Jim Blandy # Date 721116762 0 # Node ID 695c6eb2ff31bd108eec59e2263c26b76684dfbd # Parent 5af75a1a9a2410d350b3a9e9c2404a622604a6cd * etags.el (find-tag-noselect): Doc fix. diff -r 5af75a1a9a24 -r 695c6eb2ff31 lisp/progmodes/etags.el --- a/lisp/progmodes/etags.el Sat Nov 07 06:12:11 1992 +0000 +++ b/lisp/progmodes/etags.el Sat Nov 07 06:12:42 1992 +0000 @@ -513,7 +513,7 @@ ;;;###autoload (defun find-tag-noselect (tagname &optional next-p regexp-p) "Find tag (in current tags table) whose name contains TAGNAME. -Returns the buffer containing the tag's definition moves its point there, +Returns the buffer containing the tag's definition and moves its point there, but does not select the buffer. The default for TAGNAME is the expression in the buffer near point. @@ -637,9 +637,12 @@ ;; specified source file and return. Qualified matches are remembered to ;; avoid repetition. State is saved so that the loop can be continued. -(defun find-tag-in-order (pattern search-forward-func order - next-line-after-failure-p matching - first-search) +(defun find-tag-in-order (pattern + search-forward-func + order + next-line-after-failure-p + matching + first-search) (let (file ;name of file containing tag tag-info ;where to find the tag in FILE tags-table-file ;name of tags file