diff --git a/yatex.el b/yatex.el
index 6133d31..1673d01 100644
--- a/yatex.el
+++ b/yatex.el
@@ -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))
diff --git a/yatexmth.el b/yatexmth.el
index 7f45be9..d0ccfa4 100644
--- a/yatexmth.el
+++ b/yatexmth.el
@@ -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