Mercurial > hgrepos > hgweb.cgi > yatex

changeset 252:73fef09ebc15 dev

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Completion relay: documentclass -> title, document -> section.
author HIROSE Yuuji <yuuji@gentei.org>
date Sat, 11 Feb 2012 23:38:51 +0900
parents ceca2d094d6f
children 90aa4b6d96e1
files yatexadd.el
diffstat 1 files changed, 11 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/yatexadd.el	Sat Feb 11 12:19:43 2012 +0900
+++ b/yatexadd.el	Sat Feb 11 23:38:51 2012 +0900
@@ -2,7 +2,7 @@
 ;;; YaTeX add-in functions.
 ;;; yatexadd.el rev.20
 ;;; (c)1991-2012 by HIROSE Yuuji.[yuuji@yatex.org]
-;;; Last modified Sat Feb 11 12:01:45 2012 on firestorm
+;;; Last modified Sat Feb 11 23:36:21 2012 on firestorm
 ;;; $Id$
 
 ;;;
@@ -1769,7 +1769,8 @@
 	    'YaTeX:documentclasses-private
 	    'YaTeX:documentclasses-local)))
       (if (string= "" sname) (setq sname YaTeX-default-documentclass))
-      (setq YaTeX-default-documentclass sname)))))
+      (setq YaTeX-section-name "title"
+	    YaTeX-default-documentclass sname)))))
 
 (defun YaTeX::title (&optional argp)
   (prog1 (read-string "Document Title: ")
@@ -1781,6 +1782,14 @@
     (setq YaTeX-section-name "date"
 	  YaTeX-single-command "maketitle")))
 
+(defun YaTeX:document ()
+  (setq YaTeX-section-name
+	(if (string-match "book\\|bk" YaTeX-default-documentclass)
+	    "chapter"
+	  "section"))
+  "")
+      
+
 (defvar YaTeX:latex2e-named-color-alist
   '(("GreenYellow") ("Yellow") ("Goldenrod") ("Dandelion") ("Apricot")
     ("Peach") ("Melon") ("YellowOrange") ("Orange") ("BurntOrange")

yatex.org