diff options
| -rw-r--r-- | lisp/progmodes/etags.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el index db2c8efbd40..85c5992998a 100644 --- a/lisp/progmodes/etags.el +++ b/lisp/progmodes/etags.el @@ -1784,10 +1784,10 @@ Bind `case-fold-search' during the evaluation, depending on the value of (defun tags--compat-initialize (initialize) (fileloop-initialize (tags--compat-files initialize) + (lambda () (tags-loop-eval tags-loop-scan)) (if tags-loop-operate (lambda () (tags-loop-eval tags-loop-operate)) - (lambda () (message "Scanning file %s...found" buffer-file-name) nil)) - (lambda () (tags-loop-eval tags-loop-scan)))) + (lambda () (message "Scanning file %s...found" buffer-file-name) nil)))) ;;;###autoload (defun tags-loop-continue (&optional first-time) |