diff options
| -rw-r--r-- | lisp/textmodes/reftex-global.el | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/lisp/textmodes/reftex-global.el b/lisp/textmodes/reftex-global.el index cdff2f479fa..6103c6c0206 100644 --- a/lisp/textmodes/reftex-global.el +++ b/lisp/textmodes/reftex-global.el | |||
| @@ -27,6 +27,8 @@ | |||
| 27 | (eval-when-compile (require 'cl-lib)) | 27 | (eval-when-compile (require 'cl-lib)) |
| 28 | (provide 'reftex-global) | 28 | (provide 'reftex-global) |
| 29 | (require 'reftex) | 29 | (require 'reftex) |
| 30 | |||
| 31 | (declare-function fileloop-continue "fileloop") | ||
| 30 | ;;; | 32 | ;;; |
| 31 | 33 | ||
| 32 | ;;;###autoload | 34 | ;;;###autoload |
| @@ -98,8 +100,11 @@ No active TAGS table is required." | |||
| 98 | (unless to | 100 | (unless to |
| 99 | (setq to (read-string (format "Replace regexp %s with: " from)))) | 101 | (setq to (read-string (format "Replace regexp %s with: " from)))) |
| 100 | (reftex-access-scan-info current-prefix-arg) | 102 | (reftex-access-scan-info current-prefix-arg) |
| 101 | (tags-query-replace from to (or delimited current-prefix-arg) | 103 | (fileloop-initialize-replace |
| 102 | (list 'reftex-all-document-files)))) | 104 | from to (reftex-all-document-files) |
| 105 | (if (equal from (downcase from)) nil 'default) | ||
| 106 | (or delimited current-prefix-arg)) | ||
| 107 | (fileloop-continue))) | ||
| 103 | 108 | ||
| 104 | (defvar TeX-master) | 109 | (defvar TeX-master) |
| 105 | (defvar isearch-next-buffer-function) | 110 | (defvar isearch-next-buffer-function) |