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

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

[elpa] externals/auctex fb9c5645dc 49/76: * style/ltxtable.el ("ltxtable


From: Tassilo Horn
Subject: [elpa] externals/auctex fb9c5645dc 49/76: * style/ltxtable.el ("ltxtable"): Replace `TeX-arg-eval'.
Date: Fri, 13 Jan 2023 14:31:05 -0500 (EST)

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

    * style/ltxtable.el ("ltxtable"): Replace `TeX-arg-eval'.
---
 style/ltxtable.el | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/style/ltxtable.el b/style/ltxtable.el
index 51b9b02550..3a0b97ea83 100644
--- a/style/ltxtable.el
+++ b/style/ltxtable.el
@@ -58,19 +58,18 @@ The regexp for the 2. argument is the same as for \"input\" 
and
    (TeX-run-style-hooks "tabularx" "longtable")
 
    (TeX-add-symbols
-    '("LTXtable"
+    `("LTXtable"
       (TeX-arg-length "Width" "1.0\\linewidth")
-      (TeX-arg-eval
-       (lambda ()
+      ,(lambda (optional)
          (let ((longtable (file-relative-name
                            (read-file-name
-                            "File with longtable: "
+                            (TeX-argument-prompt optional nil "File with 
longtable")
                             nil nil nil nil
                             (lambda (x)
                               (or (file-directory-p x)
                                   (string-match "\\.\\(tex\\|ltx\\)\\'" x))))
                            (TeX-master-directory))))
-           (format "%s" longtable))))))
+           (TeX-argument-insert longtable optional)))))
 
    ;; Make sure that \LTXtable stays in its own line:
    (LaTeX-paragraph-commands-add-locally "LTXtable")



reply via email to

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