yatex
changeset 177:9c5a764a871f dev
Treat `alltt' in YaTeX-verbatim-environments.
author | yuuji@gentei.org |
---|---|
date | Wed, 16 Mar 2011 10:26:25 +0900 |
parents | ad313119ba15 |
children | 2f9069006bdb |
files | yatex.el yatexmth.el |
diffstat | 2 files changed, 11 insertions(+), 12 deletions(-) [+] |
line diff
1.1 --- a/yatex.el Wed Mar 16 09:57:42 2011 +0900 1.2 +++ b/yatex.el Wed Mar 16 10:26:25 2011 +0900 1.3 @@ -2,7 +2,7 @@ 1.4 ;;; Yet Another tex-mode for emacs - //–ì’¹// 1.5 ;;; yatex.el rev. 1.74.4 1.6 ;;; (c)1991-2011 by HIROSE Yuuji.[yuuji@yatex.org] 1.7 -;;; Last modified Wed Mar 16 09:56:43 2011 on firestorm 1.8 +;;; Last modified Wed Mar 16 10:16:18 2011 on firestorm 1.9 ;;; $Id$ 1.10 ;;; The latest version of this software is always available at; 1.11 ;;; http://www.yatex.org/ 1.12 @@ -151,9 +151,9 @@ 1.13 for YaTeX-uncomment-paragraph.") 1.14 1.15 (defvar YaTeX-verbatim-environments 1.16 - '("verbatim" "verbatim*") 1.17 + '("verbatim" "verbatim*" "alltt") 1.18 "*Assume these environments of this variable disable LaTeX commands.") 1.19 -(defvar YaTeX-verb-regexp "verb\\*?\\|path\\|alltt" 1.20 +(defvar YaTeX-verb-regexp "verb\\*?\\|path" 1.21 "*Regexp of verb family. Do not contain preceding \\\\ nor \\(\\).") 1.22 (defvar YaTeX-fill-inhibit-environments 1.23 (append '("tabular" "tabular*" "array" "picture" "eqnarray" "eqnarray*"
2.1 --- a/yatexmth.el Wed Mar 16 09:57:42 2011 +0900 2.2 +++ b/yatexmth.el Wed Mar 16 10:26:25 2011 +0900 2.3 @@ -2,7 +2,7 @@ 2.4 ;;; YaTeX math-mode-specific functions. 2.5 ;;; yatexmth.el 2.6 ;;; (c)1993-2010 by HIROSE Yuuji [yuuji@yatex.org] 2.7 -;;; Last modified Sat Sep 11 15:51:37 2010 on firestorm 2.8 +;;; Last modified Wed Mar 16 10:18:04 2011 on firestorm 2.9 ;;; $Id$ 2.10 2.11 ;;; [Customization guide] 2.12 @@ -433,10 +433,12 @@ 2.13 (list 'nth 1 list)) 2.14 2.15 (defvar YaTeX-math-cmd-regexp (concat (regexp-quote YaTeX-ec) "[A-z|]")) 2.16 -(defvar YaTeX-math-verbatim-environments 2.17 - '("alltt") 2.18 - "*List of environments in which LaTeX math mode is disabled. 2.19 -This value is appended with YaTeX-verbatim-environments.") 2.20 + 2.21 +;;; alltt goes into YaTeX-verbatim-environments 2011/3/16 2.22 +;;(defvar YaTeX-math-verbatim-environments 2.23 +;; '("alltt") 2.24 +;; "*List of environments in which LaTeX math mode is disabled. 2.25 +;;This value is appended with YaTeX-verbatim-environments.") 2.26 2.27 ;;; 2.28 ;;YaTeX math-mode functions 2.29 @@ -552,10 +554,7 @@ 2.30 (setq dollar "$$") 2.31 (backward-char 1) 2.32 (setq nest (1+ nest))) 2.33 - ((let ((YaTeX-verbatim-environments 2.34 - (append YaTeX-math-verbatim-environments 2.35 - YaTeX-verbatim-environments))) 2.36 - (YaTeX-literal-p)) 2.37 + ((YaTeX-literal-p) 2.38 nil) 2.39 ((and (equal (char-after (1- (point))) ?\\ ) 2.40 (not (equal (char-after (- (point) 3)) ?\\ )))