Mercurial > emacs
diff lisp/progmodes/etags.el @ 11792:4284a0c7971a
(tags-loop-continue): Doc fix.
Reset NEW after visiting for real, so we don't clobber the buffer again.
author | Roland McGrath <roland@gnu.org> |
---|---|
date | Thu, 11 May 1995 03:30:10 +0000 |
parents | d81023e5f033 |
children | 3685b0e52d2a |
line wrap: on
line diff
--- a/lisp/progmodes/etags.el Thu May 11 00:44:51 1995 +0000 +++ b/lisp/progmodes/etags.el Thu May 11 03:30:10 1995 +0000 @@ -1307,11 +1307,12 @@ "Continue last \\[tags-search] or \\[tags-query-replace] command. Used noninteractively with non-nil argument to begin such a command (the argument is passed to `next-file', which see). -Two variables control the processing we do on each file: -the value of `tags-loop-scan' is a form to be executed on each file -to see if it is interesting (it returns non-nil if so) -and `tags-loop-operate' is a form to execute to operate on an interesting file -If the latter returns non-nil, we exit; otherwise we scan the next file." + +Two variables control the processing we do on each file: the value of +`tags-loop-scan' is a form to be executed on each file to see if it is +interesting (it returns non-nil if so) and `tags-loop-operate' is a form to +evaluate to operate on an interesting file. If the latter evaluates to +nil, we exit; otherwise we scan the next file." (interactive) (let (new (messaged nil)) @@ -1338,6 +1339,7 @@ (let ((pos (point))) (erase-buffer) (set-buffer (find-file-noselect new)) + (setq new nil) ;No longer in a temp buffer. (widen) (goto-char pos)))