# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1669873351 -32373
# Node ID a7ad9158e3ceab0b515a8660b95089a54400608f
# Parent  cd375a3d7a290fe3f7328abaaf2013b22e90742c
Add completions for macros in booktab package

diff -r cd375a3d7a29 -r a7ad9158e3ce yatexadd.el
--- a/yatexadd.el	Thu Nov 03 10:42:49 2022 +0859
+++ b/yatexadd.el	Thu Dec 01 14:42:04 2022 +0859
@@ -1,6 +1,6 @@
 ;;; yatexadd.el --- YaTeX add-in functions -*- coding: sjis -*-
 ;;; (c)1991-2019 by HIROSE Yuuji.[yuuji@yatex.org]
-;;; Last modified Thu Nov  3 10:42:43 2022 on firestorm
+;;; Last modified Thu Dec  1 14:40:42 2022 on firestorm
 ;;; $Id$
 
 ;;; Code:
@@ -2251,6 +2251,21 @@
        ((memq c '(?c ?C)) (setq left "{\\scriptsize " right "}")))
       (format "%s%s%s" left char right)))))
 
+
+;;; -------------------- booktab staff --------------------
+(defun YaTeX::toprule (argp)
+  (if (equal argp 1) (YaTeX:read-length "Top Rule Width: ")))
+(defun YaTeX::midrule (argp)
+  (if (equal argp 1) (YaTeX:read-length "Middle Rule Width: ")))
+(defun YaTeX::cmidrule (argp)
+  (if (equal argp 1) (YaTeX:read-length "Inter-Columns Rule Width: ")))
+(defun YaTeX::bottomrule (argp)
+  (if (equal argp 1) (YaTeX:read-length "Bottom Rule Width: ")))
+(defun YaTeX::addlinespace (argp)
+  (if (equal argp 1) (YaTeX:read-length "Additional Line space: ")))
+(defun YaTeX::specialrule (argp)
+  (if (equal argp 1) (YaTeX:read-length "Special rule: ")))
+
 ;;; -------------------- beamer stuff --------------------
 (defvar YaTeX:frame-option-alist-default
   '(("plain") ("containsverbatim") ("shrink") ("squeeze")
diff -r cd375a3d7a29 -r a7ad9158e3ce yatexpkg.el
--- a/yatexpkg.el	Thu Nov 03 10:42:49 2022 +0859
+++ b/yatexpkg.el	Thu Dec 01 14:42:04 2022 +0859
@@ -1,7 +1,7 @@
 ;;; yatexpkg.el --- YaTeX package manager -*- coding: sjis -*-
 ;;; 
 ;;; (c)2003-2019 by HIROSE, Yuuji [yuuji@yatex.org]
-;;; Last modified Sun Oct 16 20:56:01 2022 on firestorm
+;;; Last modified Thu Dec  1 14:30:58 2022 on firestorm
 ;;; $Id$
 
 ;;; Code:
@@ -28,7 +28,8 @@
     ("alltt"	(env "alltt"))
     ("misc"	(section "verbfile" "listing"))
     ("verbatim"	(section "verbatiminput"))
-    ("eclbkbox"	(env "breakbox"))
+    ("boites"	(env "breakbox"))
+    ;;("eclbkbox"	(env "breakbox"))
     ("supertabular" (env "supertabular"))
     ("tabularx" (env "tabularx"))
     ("amsmath"	(env . YaTeX-package-ams-envs)
@@ -78,6 +79,8 @@
     ("subfigure"	(section "subfigure"))
     ("okumacro"	(section "ruby" "kenten"))
     ("colortbl"	(section "columncolor" "rowcolor"))
+    ("booktab"	(section "toprule" "midrule" "bottomrule" "cmidrule"
+			 "addlinespace" "specialrule"))
     )
   "Default package vs. macro list.
 Alists contains '(PACKAGENAME . MACROLIST)