Mercurial > hgrepos > hgweb.cgi > yatex

changeset 450:8871fe9f563b dev

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
YaTeX-math-other-env-alist should have list form
author HIROSE Yuuji <yuuji@gentei.org>
date Wed, 18 Jan 2017 07:49:03 +0900
parents c2c547e147c7
children 2011de73a671
files yatex.el yatexmth.el
diffstat 2 files changed, 6 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/yatex.el	Tue Jan 17 22:38:37 2017 +0900
+++ b/yatex.el	Wed Jan 18 07:49:03 2017 +0900
@@ -1,6 +1,6 @@
 ;;; yatex.el --- Yet Another tex-mode for emacs //–ì’¹// -*- coding: sjis -*-
 ;;; (c)1991-2017 by HIROSE Yuuji.[yuuji@yatex.org]
-;;; Last modified Tue Jan 17 22:33:39 2017 on firestorm
+;;; Last modified Wed Jan 18 07:44:11 2017 on firestorm
 ;;; $Id$
 ;;; The latest version of this software is always available at;
 ;;; http://www.yatex.org/
@@ -339,7 +339,7 @@
     ("smallmatrix") ("cases") ("subequations")))
 ;; Prepare list(not alist) for YaTeX::ref in yatexadd.el
 (defvar YaTeX-math-other-env-alist-default
-  '(("numcases" "subnumcases"))
+  '(("numcases") ("subnumcases"))
   "Default alist of additional environments for equations")
 (defvar YaTeX-math-other-env-alist-private nil
   "*User defined alist of additional environments for equations")
@@ -347,6 +347,8 @@
   (append YaTeX-math-other-env-alist-default
 	  YaTeX-math-other-env-alist-private)
   "Alist of additional environments for equations")
+(defvar YaTeX-math-other-env-list
+  (mapcar 'car YaTeX-math-other-env-alist))
 
 (defvar YaTeX-math-begin-list
   (mapcar 'car YaTeX-ams-math-begin-alist))
--- a/yatexmth.el	Tue Jan 17 22:38:37 2017 +0900
+++ b/yatexmth.el	Wed Jan 18 07:49:03 2017 +0900
@@ -1,7 +1,7 @@
 ;;; yatexmth.el --- YaTeX math-mode-specific functions -*- coding: sjis -*-
 ;;; 
 ;;; (c)1993-2017 by HIROSE Yuuji [yuuji@yatex.org]
-;;; Last modified Tue Jan 17 22:33:52 2017 on firestorm
+;;; Last modified Wed Jan 18 07:40:11 2017 on firestorm
 ;;; $Id$
 
 ;;; Commentary:
@@ -523,7 +523,7 @@
 	      ;;  "alignat*" "xalignat" "xalignat*" "xxalignat" "xxalignat*"
 	      YaTeX-math-begin-list
 	    )
-	  YaTeX-math-other-env-alist))
+	  YaTeX-math-other-env-list))
 	(let*((p (point)) (nest 0) me0 r firstp dollar
 	      (delim (concat YaTeX-sectioning-regexp "\\|^$\\|^\C-l"))
 	      (boundary

yatex.org