[Top][All Lists]

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

[elpa] elpa 310008b 05/51: TikZ: Add the arc command.

From: Tassilo Horn
Subject: [elpa] elpa 310008b 05/51: TikZ: Add the arc command.
Date: Sun, 22 May 2016 07:22:47 +0000 (UTC)

branch: elpa
commit 310008b94765bc324c6fd4813d1994833b4929f9
Author: Matthew Leach <address@hidden>
Commit: Matthew Leach <address@hidden>

    TikZ: Add the arc command.
    * style/tikz.el (TeX-TikZ-arg-arc): New.
      (TeX-TikZ-draw-arg-function-map): Map the 'Arc' command to
 style/tikz.el |    8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/style/tikz.el b/style/tikz.el
index d187d24..b29abf8 100644
--- a/style/tikz.el
+++ b/style/tikz.el
@@ -178,6 +178,11 @@ them as a list of strings, dropping the '()'."
   (let ((options (TeX-TikZ-arg-options t)))
     (concat "circle" options)))
+(defun TeX-TikZ-arg-arc (_ignored)
+  "Prompt the user for the arguments to the arc command."
+  (let ((options (TeX-TikZ-arg-options t)))
+    (concat "arc" options)))
 (defconst TeX-TikZ-point-function-map
   '(("Rect Point" TeX-TikZ-arg-rect-point)
     ("Polar Point" TeX-TikZ-arg-polar-point)
@@ -200,7 +205,8 @@ A set of base connectors along with variants that have \" 
+\" and
     ("Node" TeX-TikZ-arg-node)
-    ("Circle" TeX-TikZ-arg-circle))
+    ("Circle" TeX-TikZ-arg-circle)
+    ("Arc" TeX-TikZ-arg-arc))
   "An alist of argument names and functoins for TikZ's \draw.")
 (defun TeX-TikZ-draw-arg (_ignored)

reply via email to

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