From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Sat, 2 Apr 2022 14:36:39 +0000 (+0200)
Subject: Fix regression in tex alignment
X-Git-Tag: emacs-29.0.90~1931^2~813
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=56fb536e78f3e3019b85995ba1d788065c3ac415;p=emacs.git

Fix regression in tex alignment

* lisp/align.el (align-rules-list): Make alignment in tex mode
work better again (bug#54663).
---

diff --git a/lisp/align.el b/lisp/align.el
index b054b1bac47..9364d546654 100644
--- a/lisp/align.el
+++ b/lisp/align.el
@@ -546,15 +546,16 @@ The possible settings for `align-region-separate' are:
      (regexp   . "\\(\\s-*\\)\\\\\\\\")
      (modes    . align-tex-modes))
 
-    ;; With a numeric prefix argument, or C-u, space delimited text
-    ;; tables will be aligned.
+    ;; Align space delimited text as columns.
     (text-column
      (regexp   . "\\(^\\|\\S-\\)\\([ \t]+\\)\\(\\S-\\|$\\)")
      (group    . 2)
      (modes    . align-text-modes)
      (repeat   . t)
      (run-if   . ,(lambda ()
-                    (not (eq '- current-prefix-arg)))))
+                    (and (not (eq '- current-prefix-arg))
+                         (not (apply #'provided-mode-derived-p
+                                     major-mode align-tex-modes))))))
 
     ;; With a negative prefix argument, lists of dollar figures will
     ;; be aligned.