[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[AUCTeX-diffs] master 3a1a820b: ; Rearrange code after last commit.
From: |
auctex-commit |
Subject: |
[AUCTeX-diffs] master 3a1a820b: ; Rearrange code after last commit. |
Date: |
Fri, 6 May 2022 15:18:47 -0400 (EDT) |
branch: master
commit 3a1a820bdf4d5f109d2e57c0e515b5b647f2cd9b
Author: Arash Esbati <arash@gnu.org>
Commit: Arash Esbati <arash@gnu.org>
; Rearrange code after last commit.
---
latex.el | 20 ++++++++++----------
1 file changed, 10 insertions(+), 10 deletions(-)
diff --git a/latex.el b/latex.el
index a6ab5220..6b55c6a2 100644
--- a/latex.el
+++ b/latex.el
@@ -3245,6 +3245,16 @@ returning an alist. Use PROMPT as the prompt string."
(t
key-val-alist))))
+(defun TeX-arg-key-val (optional key-val-alist &optional prompt)
+ "Prompt for keys and values in KEY-VAL-ALIST.
+Insert the given value as a TeX macro argument. If OPTIONAL is
+non-nil, insert it as an optional argument. KEY-VAL-ALIST is an
+alist. The car of each element should be a string representing a
+key and the optional cdr should be a list with strings to be used
+as values for the key. Use PROMPT as the prompt string."
+ (let ((options (TeX-read-key-val optional key-val-alist prompt)))
+ (TeX-argument-insert options optional)))
+
(defun TeX-read-completing-read (optional collection &optional prompt complete
predicate require-match
initial-input hist def
@@ -3364,16 +3374,6 @@ INHERIT-INPUT-METHOD are passed to
",")
optional prefix))
-(defun TeX-arg-key-val (optional key-val-alist &optional prompt)
- "Prompt for keys and values in KEY-VAL-ALIST.
-Insert the given value as a TeX macro argument. If OPTIONAL is
-non-nil, insert it as an optional argument. KEY-VAL-ALIST is an
-alist. The car of each element should be a string representing a
-key and the optional cdr should be a list with strings to be used
-as values for the key. Use PROMPT as the prompt string."
- (let ((options (TeX-read-key-val optional key-val-alist prompt)))
- (TeX-argument-insert options optional)))
-
(defun TeX-read-hook ()
"Read a LaTeX hook and return it as a string."
(let* ((hook (completing-read
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [AUCTeX-diffs] master 3a1a820b: ; Rearrange code after last commit.,
auctex-commit <=