[elpa] externals/auctex aac8694 67/95: Use compat function `TeX-replace-regexp-in-string' in core files

[Tassilo Horn]

branch: externals/auctex
commit aac8694cfd75108915727a3e0d578c539f4a2781
Author: Arash Esbati <address@hidden>
Commit: Arash Esbati <address@hidden>

    Use compat function `TeX-replace-regexp-in-string' in core files
    
    * tex.el (TeX-source-correlate-sync-source):
    * latex.el (LaTeX-split-bibs): Use compat function
    `TeX-replace-regexp-in-string'.
---
 latex.el | 4 ++--
 tex.el   | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/latex.el b/latex.el
index 443396f..5a699f8 100644
--- a/latex.el
+++ b/latex.el
@@ -1627,9 +1627,9 @@ This is necessary since index entries may contain 
commands and stuff.")
 Split the string at commas and remove Biber file extensions."
   (let ((bibs (TeX-split-string " *, *" (TeX-match-buffer match))))
     (dolist (bib bibs)
-      (LaTeX-add-bibliographies (replace-regexp-in-string
+      (LaTeX-add-bibliographies (TeX-replace-regexp-in-string
                                 (concat "\\(?:\\."
-                                        (mapconcat 'regexp-quote
+                                        (mapconcat #'regexp-quote
                                                    TeX-Biber-file-extensions
                                                    "\\|\\.")
                                         "\\)")
diff --git a/tex.el b/tex.el
index d5a8513..f11a404 100644
--- a/tex.el
+++ b/tex.el
@@ -1926,7 +1926,7 @@ If the Emacs frame isn't raised, customize
                     (url-unhex-string (aref (url-generic-parse-url file) 6)))
                 ;; For Emacs 21 compatibility, which doesn't have the
                 ;; url package.
-                (file-error (replace-regexp-in-string "^file://" "" file))))
+                (file-error (TeX-replace-regexp-in-string "^file://" "" 
file))))
         (flc (or (apply #'TeX-source-correlate-handle-TeX-region file linecol)
                  (apply #'list file linecol)))
         (file (car flc))