yatex

changeset 249:c2aa2457a74b dev

find changesets by author, revision, files, or words in the commit message
Trivial add-in update.
author yuuji@gentei.org
date Sat, 11 Feb 2012 12:05:11 +0900
parents b9771459243e
children 4f73b796ec20
files yatexadd.el
diffstat 1 files changed, 15 insertions(+), 2 deletions(-) [+]
line diff
     1.1 --- a/yatexadd.el	Fri Feb 10 16:45:04 2012 +0900
     1.2 +++ b/yatexadd.el	Sat Feb 11 12:05:11 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 Fri Feb 10 16:30:39 2012 on firestorm
     1.8 +;;; Last modified Sat Feb 11 12:01:45 2012 on firestorm
     1.9  ;;; $Id$
    1.10  
    1.11  ;;;
    1.12 @@ -145,7 +145,10 @@
    1.13    (setq YaTeX-single-command "item")
    1.14    "")
    1.15  
    1.16 -(fset 'YaTeX:enumerate 'YaTeX:itemize)
    1.17 +(defun YaTeX:enumerate ()
    1.18 +  (setq YaTeX-single-command "item"
    1.19 +	YaTeX-section-name "label")
    1.20 +  "")
    1.21  
    1.22  (defun YaTeX:picture ()
    1.23    "Ask the size of coordinates of picture environment."
    1.24 @@ -1768,6 +1771,16 @@
    1.25        (if (string= "" sname) (setq sname YaTeX-default-documentclass))
    1.26        (setq YaTeX-default-documentclass sname)))))
    1.27  
    1.28 +(defun YaTeX::title (&optional argp)
    1.29 +  (prog1 (read-string "Document Title: ")
    1.30 +    (setq YaTeX-section-name "author"
    1.31 +	  YaTeX-single-command "maketitle")))
    1.32 +
    1.33 +(defun YaTeX::author (&optional argp)
    1.34 +  (prog1 (read-string "Document Author: ")
    1.35 +    (setq YaTeX-section-name "date"
    1.36 +	  YaTeX-single-command "maketitle")))
    1.37 +
    1.38  (defvar YaTeX:latex2e-named-color-alist
    1.39    '(("GreenYellow") ("Yellow") ("Goldenrod") ("Dandelion") ("Apricot")
    1.40      ("Peach") ("Melon") ("YellowOrange") ("Orange") ("BurntOrange")