yatex

changeset 252:73fef09ebc15 dev

find changesets by author, revision, files, or words in the commit message
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 diff
     1.1 --- a/yatexadd.el	Sat Feb 11 12:19:43 2012 +0900
     1.2 +++ b/yatexadd.el	Sat Feb 11 23:38:51 2012 +0900
     1.3 @@ -2,7 +2,7 @@
     1.4  ;;; YaTeX add-in functions.
     1.5  ;;; yatexadd.el rev.20
     1.6  ;;; (c)1991-2012 by HIROSE Yuuji.[yuuji@yatex.org]
     1.7 -;;; Last modified Sat Feb 11 12:01:45 2012 on firestorm
     1.8 +;;; Last modified Sat Feb 11 23:36:21 2012 on firestorm
     1.9  ;;; $Id$
    1.10  
    1.11  ;;;
    1.12 @@ -1769,7 +1769,8 @@
    1.13  	    'YaTeX:documentclasses-private
    1.14  	    'YaTeX:documentclasses-local)))
    1.15        (if (string= "" sname) (setq sname YaTeX-default-documentclass))
    1.16 -      (setq YaTeX-default-documentclass sname)))))
    1.17 +      (setq YaTeX-section-name "title"
    1.18 +	    YaTeX-default-documentclass sname)))))
    1.19  
    1.20  (defun YaTeX::title (&optional argp)
    1.21    (prog1 (read-string "Document Title: ")
    1.22 @@ -1781,6 +1782,14 @@
    1.23      (setq YaTeX-section-name "date"
    1.24  	  YaTeX-single-command "maketitle")))
    1.25  
    1.26 +(defun YaTeX:document ()
    1.27 +  (setq YaTeX-section-name
    1.28 +	(if (string-match "book\\|bk" YaTeX-default-documentclass)
    1.29 +	    "chapter"
    1.30 +	  "section"))
    1.31 +  "")
    1.32 +      
    1.33 +
    1.34  (defvar YaTeX:latex2e-named-color-alist
    1.35    '(("GreenYellow") ("Yellow") ("Goldenrod") ("Dandelion") ("Apricot")
    1.36      ("Peach") ("Melon") ("YellowOrange") ("Orange") ("BurntOrange")