diff --git a/yatex.el b/yatex.el index fc26233..149e15a 100644 --- a/yatex.el +++ b/yatex.el @@ -2,7 +2,7 @@ ;;; Yet Another tex-mode for emacs - //�쒹// ;;; yatex.el rev. 1.74.4 ;;; (c)1991-2011 by HIROSE Yuuji.[yuuji@yatex.org] -;;; Last modified Wed Mar 16 09:56:43 2011 on firestorm +;;; Last modified Wed Mar 16 10:16:18 2011 on firestorm ;;; $Id$ ;;; The latest version of this software is always available at; ;;; http://www.yatex.org/ @@ -151,9 +151,9 @@ for YaTeX-uncomment-paragraph.") (defvar YaTeX-verbatim-environments - '("verbatim" "verbatim*") + '("verbatim" "verbatim*" "alltt") "*Assume these environments of this variable disable LaTeX commands.") -(defvar YaTeX-verb-regexp "verb\\*?\\|path\\|alltt" +(defvar YaTeX-verb-regexp "verb\\*?\\|path" "*Regexp of verb family. Do not contain preceding \\\\ nor \\(\\).") (defvar YaTeX-fill-inhibit-environments (append '("tabular" "tabular*" "array" "picture" "eqnarray" "eqnarray*" diff --git a/yatexmth.el b/yatexmth.el index c74b770..492d317 100644 --- a/yatexmth.el +++ b/yatexmth.el @@ -2,7 +2,7 @@ ;;; YaTeX math-mode-specific functions. ;;; yatexmth.el ;;; (c)1993-2010 by HIROSE Yuuji [yuuji@yatex.org] -;;; Last modified Sat Sep 11 15:51:37 2010 on firestorm +;;; Last modified Wed Mar 16 10:18:04 2011 on firestorm ;;; $Id$ ;;; [Customization guide] @@ -433,10 +433,12 @@ (list 'nth 1 list)) (defvar YaTeX-math-cmd-regexp (concat (regexp-quote YaTeX-ec) "[A-z|]")) -(defvar YaTeX-math-verbatim-environments - '("alltt") - "*List of environments in which LaTeX math mode is disabled. -This value is appended with YaTeX-verbatim-environments.") + +;;; alltt goes into YaTeX-verbatim-environments 2011/3/16 +;;(defvar YaTeX-math-verbatim-environments +;; '("alltt") +;; "*List of environments in which LaTeX math mode is disabled. +;;This value is appended with YaTeX-verbatim-environments.") ;;; ;;YaTeX math-mode functions @@ -552,10 +554,7 @@ (setq dollar "$$") (backward-char 1) (setq nest (1+ nest))) - ((let ((YaTeX-verbatim-environments - (append YaTeX-math-verbatim-environments - YaTeX-verbatim-environments))) - (YaTeX-literal-p)) + ((YaTeX-literal-p) nil) ((and (equal (char-after (1- (point))) ?\\ ) (not (equal (char-after (- (point) 3)) ?\\ )))