Mercurial > hgrepos > hgweb.cgi > yatex

changeset 249:c2aa2457a74b dev

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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 wrap: on
line diff
--- a/yatexadd.el	Fri Feb 10 16:45:04 2012 +0900
+++ b/yatexadd.el	Sat Feb 11 12:05:11 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 Fri Feb 10 16:30:39 2012 on firestorm
+;;; Last modified Sat Feb 11 12:01:45 2012 on firestorm
 ;;; $Id$
 
 ;;;
@@ -145,7 +145,10 @@
   (setq YaTeX-single-command "item")
   "")
 
-(fset 'YaTeX:enumerate 'YaTeX:itemize)
+(defun YaTeX:enumerate ()
+  (setq YaTeX-single-command "item"
+	YaTeX-section-name "label")
+  "")
 
 (defun YaTeX:picture ()
   "Ask the size of coordinates of picture environment."
@@ -1768,6 +1771,16 @@
       (if (string= "" sname) (setq sname YaTeX-default-documentclass))
       (setq YaTeX-default-documentclass sname)))))
 
+(defun YaTeX::title (&optional argp)
+  (prog1 (read-string "Document Title: ")
+    (setq YaTeX-section-name "author"
+	  YaTeX-single-command "maketitle")))
+
+(defun YaTeX::author (&optional argp)
+  (prog1 (read-string "Document Author: ")
+    (setq YaTeX-section-name "date"
+	  YaTeX-single-command "maketitle")))
+
 (defvar YaTeX:latex2e-named-color-alist
   '(("GreenYellow") ("Yellow") ("Goldenrod") ("Dandelion") ("Apricot")
     ("Peach") ("Melon") ("YellowOrange") ("Orange") ("BurntOrange")

yatex.org