auctex-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 41397e93: ; Improve last change


From: Arash Esbati
Subject: master 41397e93: ; Improve last change
Date: Sun, 12 Feb 2023 14:54:07 -0500 (EST)

branch: master
commit 41397e93cb43ec0ba0db3ac88a9428c7519f71c5
Author: Arash Esbati <arash@gnu.org>
Commit: Arash Esbati <arash@gnu.org>

    ; Improve last change
    
    * style/algpseudocodex.el (LaTeX-arg-algpseudocodex-block):
    Simplify code.
---
 style/algpseudocodex.el | 14 +++-----------
 1 file changed, 3 insertions(+), 11 deletions(-)

diff --git a/style/algpseudocodex.el b/style/algpseudocodex.el
index d9b0fe5a..d2b9848d 100644
--- a/style/algpseudocodex.el
+++ b/style/algpseudocodex.el
@@ -52,21 +52,13 @@ the number of arguments."
          (set-marker TeX-exit-mark (point))
          (insert TeX-grcl)
          (indent-according-to-mode))
-        ((and num (= num 2))
-         (indent-according-to-mode)
-         (insert TeX-grop)
-         (set-marker TeX-exit-mark (point))
-         (insert TeX-grcl TeX-grop TeX-grcl)
-         (LaTeX-newline)
-         (indent-according-to-mode)
-         (LaTeX-newline)
-         (insert TeX-esc "End" block)
-         (indent-according-to-mode))
-        ((and num (= num 1))
+        ((integerp num)
          (indent-according-to-mode)
          (insert TeX-grop)
          (set-marker TeX-exit-mark (point))
          (insert TeX-grcl)
+         (when (= num 2)
+           (insert TeX-grop TeX-grcl))
          (LaTeX-newline)
          (indent-according-to-mode)
          (LaTeX-newline)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]