Mercurial > hgrepos > hgweb.cgi > yatex

changeset 602:a7ad9158e3ce draft dev

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add completions for macros in booktab package
author HIROSE Yuuji <yuuji@gentei.org>
date Thu, 01 Dec 2022 14:42:04 +0859
parents cd375a3d7a29
children c3e61ea3ba7f
files yatexadd.el yatexpkg.el
diffstat 2 files changed, 21 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- 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")
--- 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)

yatex.org