master 20cabef8: ; Delete unnecessary `TeX-arg-string'

[Arash Esbati]

branch: master
commit 20cabef81f4bf85161f810c02eb8bff7966d2eee
Author: Arash Esbati <arash@gnu.org>
Commit: Arash Esbati <arash@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"]