yatex

changeset 197:3842e55025aa dev

find changesets by author, revision, files, or words in the commit message
Note on { after \begin.
author yuuji@gentei.org
date Tue, 10 Jan 2012 14:12:51 +0900
parents 701d87b607e0
children 768ff443ef84
files yatex.el
diffstat 1 files changed, 14 insertions(+), 10 deletions(-) [+]
line diff
     1.1 --- a/yatex.el	Tue Jan 10 13:19:55 2012 +0900
     1.2 +++ b/yatex.el	Tue Jan 10 14:12:51 2012 +0900
     1.3 @@ -2,7 +2,7 @@
     1.4  ;;; Yet Another tex-mode for emacs - //–ì’¹//
     1.5  ;;; yatex.el rev. 1.74.7
     1.6  ;;; (c)1991-2012 by HIROSE Yuuji.[yuuji@yatex.org]
     1.7 -;;; Last modified Tue Jan 10 13:17:19 2012 on firestorm
     1.8 +;;; Last modified Tue Jan 10 13:27:32 2012 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 @@ -1496,6 +1496,9 @@
    1.13  ;    (backward-char 1))
    1.14     (t (YaTeX-self-insert arg))))
    1.15  
    1.16 +(defvar YaTeX-use-jmode-hook (not (and (fboundp 'skk-mode) (boundp 'skk-mode)))
    1.17 +  "*Non-nil means activate automatic jmode switcher within/out math mode.
    1.18 +Hopefully, change default to t in the next version of 1.75.")
    1.19  (defun YaTeX-jmode-hook (old new)
    1.20    "A hook controling jmode on/off."
    1.21    ;; This function is called via point-entered/leave hook, so that
    1.22 @@ -1550,15 +1553,16 @@
    1.23        (insert "$")
    1.24      (insert "$$")
    1.25      (forward-char -1)
    1.26 -    (if (fboundp 'add-text-properties)
    1.27 -	(add-text-properties
    1.28 -	 (1- (point)) (1+ (point))
    1.29 -	 (list 'point-left 'YaTeX-jmode-hook
    1.30 -	       'point-entered 'YaTeX-jmode-hook
    1.31 -	       'front-sticky t
    1.32 -	       'rear-nonsticky t
    1.33 -	       'mjmode nil
    1.34 -	       'jmode (YaTeX-jmode))))
    1.35 +    (and YaTeX-use-jmode-hook
    1.36 +	 (fboundp 'add-text-properties)
    1.37 +	 (add-text-properties
    1.38 +	  (1- (point)) (1+ (point))
    1.39 +	  (list 'point-left 'YaTeX-jmode-hook
    1.40 +		'point-entered 'YaTeX-jmode-hook
    1.41 +		'front-sticky t
    1.42 +		'rear-nonsticky t
    1.43 +		'mjmode nil
    1.44 +		'jmode (YaTeX-jmode))))
    1.45      (YaTeX-jmode-off)
    1.46      (or YaTeX-auto-math-mode YaTeX-math-mode (YaTeX-toggle-math-mode 1))))
    1.47