emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[elpa] externals/auctex 9b5cf4b550 27/77: Fix insertion of second option


From: Tassilo Horn
Subject: [elpa] externals/auctex 9b5cf4b550 27/77: Fix insertion of second optional argument
Date: Fri, 26 Aug 2022 16:06:33 -0400 (EDT)

branch: externals/auctex
commit 9b5cf4b550b667a0895fe3ad85070b4f2e016a10
Author: Arash Esbati <arash@gnu.org>
Commit: Arash Esbati <arash@gnu.org>

    Fix insertion of second optional argument
    
    * style/enumitem.el (LaTeX-arg-enumitem-setlist): Bind the values
    for `TeX-arg-opening-brace' and `TeX-arg-closing-brace' when
    inserting the second optional argument.
---
 style/enumitem.el | 26 ++++++++++++++------------
 1 file changed, 14 insertions(+), 12 deletions(-)

diff --git a/style/enumitem.el b/style/enumitem.el
index d8ad056651..62ad17f1c7 100644
--- a/style/enumitem.el
+++ b/style/enumitem.el
@@ -331,18 +331,20 @@ provided.  OPTIONAL is ignored."
                    sizes))))
       (TeX-argument-insert size t)))
   ;; Second opt. argument:
-  (TeX-argument-insert
-   (mapconcat #'identity
-              (TeX-completing-read-multiple
-               (TeX-argument-prompt t nil "Environment(s), level(s)")
-               (append
-                (when (LaTeX-provided-package-options-member
-                       "enumitem" "includedisplayed")
-                  '("trivlist"))
-                (mapcar #'car (LaTeX-enumitem-newlist-list))
-                '("1" "2" "3" "4")))
-              ",")
-   t)
+  (let ((TeX-arg-opening-brace LaTeX-optop)
+        (TeX-arg-closing-brace LaTeX-optcl))
+    (TeX-argument-insert
+     (mapconcat #'identity
+                (TeX-completing-read-multiple
+                 (TeX-argument-prompt t nil "Environment(s), level(s)")
+                 (append
+                  (when (LaTeX-provided-package-options-member
+                         "enumitem" "includedisplayed")
+                    '("trivlist"))
+                  (mapcar #'car (LaTeX-enumitem-newlist-list))
+                  '("1" "2" "3" "4")))
+                ",")
+     t))
   ;; Mandatory argument:
   (TeX-argument-insert
    (TeX-read-key-val nil (LaTeX-enumitem-key-val-options))



reply via email to

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