auctex-diffs
[Top][All Lists]
Advanced

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

master fb9c5645 2/3: * style/ltxtable.el ("ltxtable"): Replace `TeX-arg-


From: Arash Esbati
Subject: master fb9c5645 2/3: * style/ltxtable.el ("ltxtable"): Replace `TeX-arg-eval'.
Date: Wed, 14 Dec 2022 08:04:12 -0500 (EST)

branch: master
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 51b9b025..3a0b97ea 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]