branch: master commit 20cabef81f4bf85161f810c02eb8bff7966d2eee Author: Arash Esbati <ar...@gnu.org> Commit: Arash Esbati <ar...@gnu.org>
; Delete unnecessary `TeX-arg-string' * style/textpos.el ("textpos"): * style/thm-restate.el ("thm-restate"): * style/wrapfig.el ("wrapfig"): Drop using unnecessary `TeX-arg-string'. --- style/textpos.el | 4 ++-- style/thm-restate.el | 4 ++-- style/wrapfig.el | 8 ++++---- 3 files changed, 8 insertions(+), 8 deletions(-) diff --git a/style/textpos.el b/style/textpos.el index 50187f92..c3ee081a 100644 --- a/style/textpos.el +++ b/style/textpos.el @@ -95,7 +95,7 @@ them." (and (fboundp 'LaTeX-color-definecolor-list) (LaTeX-color-definecolor-list)))) "Color name")) - ((TeX-arg-string "Color name")))) + ("Color name"))) `("textblockrulecolour" (TeX-arg-conditional (TeX-member "\\`x?color\\'" (TeX-style-list) #'string-match) @@ -105,7 +105,7 @@ them." (and (fboundp 'LaTeX-color-definecolor-list) (LaTeX-color-definecolor-list)))) "Color name")) - ((TeX-arg-string "Color name")))) + ("Color name"))) '("TPshowboxestrue") '("TPshowboxesfalse") diff --git a/style/thm-restate.el b/style/thm-restate.el index 9f85050b..0fcd6ece 100644 --- a/style/thm-restate.el +++ b/style/thm-restate.el @@ -99,7 +99,7 @@ ;; Provide restatable\\*? environment (LaTeX-add-environments `("restatable" LaTeX-env-args - [TeX-arg-string "Heading"] + ["Heading"] (TeX-arg-completing-read ;; Name of the environment we are referring to; this can be ;; defined via amsthm.sty, ntheorem.sty or thmtools.sty: @@ -119,7 +119,7 @@ LaTeX-env-thmrestate-restatable) `("restatable*" LaTeX-env-args - [TeX-arg-string "Heading"] + ["Heading"] (TeX-arg-completing-read ;; Name of the environment we are referring to; this can be ;; defined via amsthm.sty, ntheorem.sty or thmtools.sty: diff --git a/style/wrapfig.el b/style/wrapfig.el index cde72ae0..f56f4041 100644 --- a/style/wrapfig.el +++ b/style/wrapfig.el @@ -43,7 +43,7 @@ (LaTeX-add-environments ;; \begin{wrapfigure}[No.lines]{Placement}[Overhang]{Width} ... \end{wrapfigure} '("wrapfigure" LaTeX-env-args - [TeX-arg-string "Number of narrow lines"] + ["Number of narrow lines"] (TeX-arg-completing-read ("r" "R" "l" "L" "i" "I" "o" "O") "Placement") [TeX-arg-length "Overhang"] @@ -51,7 +51,7 @@ ;; \begin{wraptable}[No.lines]{Placement}[Overhang]{Width} ... \end{wraptable} '("wraptable" LaTeX-env-args - [TeX-arg-string "Number of narrow lines"] + ["Number of narrow lines"] (TeX-arg-completing-read ("r" "R" "l" "L" "i" "I" "o" "O") "Placement") [TeX-arg-length "Overhang"] @@ -71,8 +71,8 @@ ,(lambda () (mapcar #'car (LaTeX-newfloat-DeclareFloatingEnvironment-list))) "Float type")) - ((TeX-arg-string "Float type"))) - [TeX-arg-string "Number of narrow lines"] + ("Float type")) + ["Number of narrow lines"] (TeX-arg-completing-read ("r" "R" "l" "L" "i" "I" "o" "O") "Placement") [TeX-arg-length "Overhang"]