[AUCTeX-diffs] [elpa] externals/auctex 49720ce 62/67: Remove compatibility code for older emacsen

[Tassilo Horn]

branch: externals/auctex
commit 49720cea6e3ffb4cf84453c4852435496593373b
Author: Ikumi Keita <address@hidden>
Commit: Ikumi Keita <address@hidden>

    Remove compatibility code for older emacsen
    
    * context.el (ConTeXt-mode-common-initialization):
    * latex.el (TeX-latex-mode):
    * plain-tex.el (TeX-plain-tex-mode, ams-tex-mode):
    * tex-info.el (TeX-texinfo-mode):
    Use `run-mode-hooks' instead of `TeX-run-mode-hooks'.
    * tex.el (TeX-run-mode-hooks): Remove.
---
 context.el   | 2 +-
 latex.el     | 2 +-
 plain-tex.el | 4 ++--
 tex-info.el  | 2 +-
 tex.el       | 3 ---
 5 files changed, 5 insertions(+), 8 deletions(-)

diff --git a/context.el b/context.el
index 5622d8a..db2f86f 100644
--- a/context.el
+++ b/context.el
@@ -1782,7 +1782,7 @@ i.e. you do _not_ have to cater for this yourself by 
adding \\' or $."
   ;; run hooks
   (setq TeX-command-default "ConTeXt")
   (setq TeX-sentinel-default-function 'TeX-ConTeXt-sentinel)
-  (TeX-run-mode-hooks 'text-mode-hook 'TeX-mode-hook 'ConTeXt-mode-hook))
+  (run-mode-hooks 'text-mode-hook 'TeX-mode-hook 'ConTeXt-mode-hook))
 
 (defun context-guess-current-interface ()
   "Guess what ConTeXt interface the current buffer is using."
diff --git a/latex.el b/latex.el
index 3b8cc5c..d260006 100644
--- a/latex.el
+++ b/latex.el
@@ -5926,7 +5926,7 @@ of `LaTeX-mode-hook'."
                       (apply #'append
                              (mapcar #'cdr LaTeX-provided-class-options)))))
            nil t)
-  (TeX-run-mode-hooks 'text-mode-hook 'TeX-mode-hook 'LaTeX-mode-hook)
+  (run-mode-hooks 'text-mode-hook 'TeX-mode-hook 'LaTeX-mode-hook)
   (when (fboundp 'LaTeX-preview-setup)
     (LaTeX-preview-setup))
   (TeX-set-mode-name)
diff --git a/plain-tex.el b/plain-tex.el
index 4be0e3d..af1a74d 100644
--- a/plain-tex.el
+++ b/plain-tex.el
@@ -138,7 +138,7 @@ of `plain-TeX-mode-hook'."
   (add-hook 'tool-bar-mode-on-hook 'plain-TeX-maybe-install-toolbar nil t)
   (when (and (boundp 'tool-bar-mode) tool-bar-mode)
     (plain-TeX-maybe-install-toolbar))
-  (TeX-run-mode-hooks 'text-mode-hook 'TeX-mode-hook 'plain-TeX-mode-hook)
+  (run-mode-hooks 'text-mode-hook 'TeX-mode-hook 'plain-TeX-mode-hook)
   (TeX-set-mode-name))
 
 (defun plain-TeX-common-initialization ()
@@ -314,7 +314,7 @@ of `AmS-TeX-mode-hook'."
 
   (setq TeX-base-mode-name "AmS-TeX")
   (setq TeX-command-default "AmSTeX")
-  (TeX-run-mode-hooks 'text-mode-hook 'TeX-mode-hook 'AmS-TeX-mode-hook)
+  (run-mode-hooks 'text-mode-hook 'TeX-mode-hook 'AmS-TeX-mode-hook)
   (TeX-set-mode-name))
 
 (defcustom AmSTeX-clean-intermediate-suffixes
diff --git a/tex-info.el b/tex-info.el
index 71e97c2..b1fd236 100644
--- a/tex-info.el
+++ b/tex-info.el
@@ -853,7 +853,7 @@ value of `Texinfo-mode-hook'."
   (if (and (boundp 'reftex-mode) reftex-mode)
       (Texinfo-reftex-hook))
 
-  (TeX-run-mode-hooks 'text-mode-hook 'Texinfo-mode-hook)
+  (run-mode-hooks 'text-mode-hook 'Texinfo-mode-hook)
   (TeX-set-mode-name))
 
 (defcustom Texinfo-clean-intermediate-suffixes nil
diff --git a/tex.el b/tex.el
index 625dd60..6acf13f 100644
--- a/tex.el
+++ b/tex.el
@@ -4665,9 +4665,6 @@ to look backward for."
     (skip-chars-backward "
")
     (bobp)))
 
-(defalias 'TeX-run-mode-hooks
-  (if (fboundp 'run-mode-hooks) 'run-mode-hooks 'run-hooks))
-
 (defun TeX-add-to-alist (alist-var new-alist)
   "Add NEW-ALIST to the ALIST-VAR.
 If an element with the same key as the key of an element of