yatex
changeset 450:8871fe9f563b dev
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 diff
1.1 --- a/yatex.el Tue Jan 17 22:38:37 2017 +0900 1.2 +++ b/yatex.el Wed Jan 18 07:49:03 2017 +0900 1.3 @@ -1,6 +1,6 @@ 1.4 ;;; yatex.el --- Yet Another tex-mode for emacs //–ì’¹// -*- coding: sjis -*- 1.5 ;;; (c)1991-2017 by HIROSE Yuuji.[yuuji@yatex.org] 1.6 -;;; Last modified Tue Jan 17 22:33:39 2017 on firestorm 1.7 +;;; Last modified Wed Jan 18 07:44:11 2017 on firestorm 1.8 ;;; $Id$ 1.9 ;;; The latest version of this software is always available at; 1.10 ;;; http://www.yatex.org/ 1.11 @@ -339,7 +339,7 @@ 1.12 ("smallmatrix") ("cases") ("subequations"))) 1.13 ;; Prepare list(not alist) for YaTeX::ref in yatexadd.el 1.14 (defvar YaTeX-math-other-env-alist-default 1.15 - '(("numcases" "subnumcases")) 1.16 + '(("numcases") ("subnumcases")) 1.17 "Default alist of additional environments for equations") 1.18 (defvar YaTeX-math-other-env-alist-private nil 1.19 "*User defined alist of additional environments for equations") 1.20 @@ -347,6 +347,8 @@ 1.21 (append YaTeX-math-other-env-alist-default 1.22 YaTeX-math-other-env-alist-private) 1.23 "Alist of additional environments for equations") 1.24 +(defvar YaTeX-math-other-env-list 1.25 + (mapcar 'car YaTeX-math-other-env-alist)) 1.26 1.27 (defvar YaTeX-math-begin-list 1.28 (mapcar 'car YaTeX-ams-math-begin-alist))
2.1 --- a/yatexmth.el Tue Jan 17 22:38:37 2017 +0900 2.2 +++ b/yatexmth.el Wed Jan 18 07:49:03 2017 +0900 2.3 @@ -1,7 +1,7 @@ 2.4 ;;; yatexmth.el --- YaTeX math-mode-specific functions -*- coding: sjis -*- 2.5 ;;; 2.6 ;;; (c)1993-2017 by HIROSE Yuuji [yuuji@yatex.org] 2.7 -;;; Last modified Tue Jan 17 22:33:52 2017 on firestorm 2.8 +;;; Last modified Wed Jan 18 07:40:11 2017 on firestorm 2.9 ;;; $Id$ 2.10 2.11 ;;; Commentary: 2.12 @@ -523,7 +523,7 @@ 2.13 ;; "alignat*" "xalignat" "xalignat*" "xxalignat" "xxalignat*" 2.14 YaTeX-math-begin-list 2.15 ) 2.16 - YaTeX-math-other-env-alist)) 2.17 + YaTeX-math-other-env-list)) 2.18 (let*((p (point)) (nest 0) me0 r firstp dollar 2.19 (delim (concat YaTeX-sectioning-regexp "\\|^$\\|^\C-l")) 2.20 (boundary