Mercurial > hgrepos > hgweb.cgi > yatex
diff yatex.el @ 290:1a4332ecc58b dev
For emacs-24.3+ and NEmacs(last-command-{char,event} handling)
author | HIROSE Yuuji <yuuji@gentei.org> |
---|---|
date | Sun, 27 Jan 2013 23:34:29 +0900 |
parents | dffc0d979ae0 |
children | 027c4e8d98ce |
line wrap: on
line diff
--- a/yatex.el Sun Jan 27 18:50:23 2013 +0900 +++ b/yatex.el Sun Jan 27 23:34:29 2013 +0900 @@ -1,6 +1,6 @@ ;;; yatex.el --- Yet Another tex-mode for emacs //–ì’¹// -*- coding: sjis -*- ;;; (c)1991-2012 by HIROSE Yuuji.[yuuji@yatex.org] -;;; Last modified Thu Oct 25 16:24:50 2012 on firestorm +;;; Last modified Sun Jan 27 20:10:46 2013 on firestorm ;;; $Id$ ;;; The latest version of this software is always available at; ;;; http://www.yatex.org/ @@ -1363,7 +1363,7 @@ (setplist 'YaTeX-jmode nil)) (defun YaTeX-self-insert (arg) - (call-interactively (global-key-binding (char-to-string last-command-char)))) + (call-interactively (global-key-binding (char-to-string (YaTeX-last-key))))) (defun YaTeX-insert-inherit (&rest args) (apply (if (fboundp 'insert-and-inherit) 'insert-and-inherit 'insert) args)) @@ -1398,7 +1398,7 @@ ((and (= (preceding-char) ?\\ ) (/= (char-after (- (point) 2)) ?\\ ) (not (YaTeX-in-math-mode-p))) - (YaTeX-insert-inherit last-command-char "\n") + (YaTeX-insert-inherit (YaTeX-last-key) "\n") (indent-to (max 0 col)) (YaTeX-insert-inherit "\\]") (beginning-of-line)