Commit bba5cc96 authored by Lars Ingebrigtsen's avatar Lars Ingebrigtsen

Avoid obsolete function in reftex-global.el

* lisp/textmodes/reftex-global.el (reftex-query-replace-document):
Rewrite to use fileloop directly to avoid the obsolete function
tags-query-replace.
parent e25d6cb0
......@@ -27,6 +27,8 @@
(eval-when-compile (require 'cl-lib))
(provide 'reftex-global)
(require 'reftex)
(declare-function fileloop-continue "fileloop")
;;;
;;;###autoload
......@@ -98,8 +100,11 @@ No active TAGS table is required."
(unless to
(setq to (read-string (format "Replace regexp %s with: " from))))
(reftex-access-scan-info current-prefix-arg)
(tags-query-replace from to (or delimited current-prefix-arg)
(list 'reftex-all-document-files))))
(fileloop-initialize-replace
from to (reftex-all-document-files)
(if (equal from (downcase from)) nil 'default)
(or delimited current-prefix-arg))
(fileloop-continue)))
(defvar TeX-master)
(defvar isearch-next-buffer-function)
......
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