From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Tue, 20 Sep 2022 13:58:21 +0000 (-0400)
Subject: * lisp/text-modes/tex-mode.el (tex-mode): Fix AUCTeX regression
X-Git-Tag: emacs-28.3-rc1~66
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5085351645dc503150823660443f497c5cf8d2ec;p=emacs.git

* lisp/text-modes/tex-mode.el (tex-mode): Fix AUCTeX regression

As discussed in
https://lists.gnu.org/r/auctex/2022-08/msg00004.html
AUCTeX installs its own advice to redefine `tex-mode`, and that
advice used to take precedence before commit 6075a7c5ae3fa456cd.
---

diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el
index 64e38ad6973..587ec406efa 100644
--- a/lisp/textmodes/tex-mode.el
+++ b/lisp/textmodes/tex-mode.el
@@ -1013,7 +1013,10 @@ such as if there are no commands in the file, the value of `tex-default-mode'
 says which mode to use."
   (tex-common-initialization))
 
-(advice-add 'tex-mode :around #'tex--redirect-to-submode)
+(advice-add 'tex-mode :around #'tex--redirect-to-submode
+            ;; Give it lower precedence than normal advice, so
+            ;; AUCTeX's advice takes precedence over it.
+            '((depth . 50)))
 (defvar tex-mode--recursing nil)
 (defun tex--redirect-to-submode (orig-fun)
   "Redirect to one of the submodes when called directly."