Mercurial > hgrepos > hgweb.cgi > yatex
diff yatexmth.el @ 56:a9653fbd1c1c
Bug fix version
author | yuuji |
---|---|
date | Thu, 29 Jun 1995 13:46:57 +0000 |
parents | 5f4b18da14b3 |
children | 18f4939986e6 |
line wrap: on
line diff
--- a/yatexmth.el Thu Jun 29 13:37:36 1995 +0000 +++ b/yatexmth.el Thu Jun 29 13:46:57 1995 +0000 @@ -2,7 +2,7 @@ ;;; YaTeX math-mode-specific functions. ;;; yatexmth.el rev.4 ;;; (c )1993-1995 by HIROSE Yuuji [yuuji@ae.keio.ac.jp] -;;; Last modified Fri Jan 27 23:57:40 1995 on VFR +;;; Last modified Sat Feb 18 03:54:50 1995 on VFR ;;; $Id$ ;;; [Customization guide] @@ -604,7 +604,8 @@ (not YaTeX-math-mode))) (throw 'complete 'escape));this tag should be exit, but... (while t - (message "Sequence(TAB for menu): %s" key) + (message "Sequence%s: %s" + (if YaTeX-simple-messages "" "(TAB for menu)") key) (setq last-char (read-char) key (concat key (char-to-string last-char)) i 0) @@ -624,7 +625,8 @@ (setq key (substring key 0 -2)))) (setq regkey (concat "^" (regexp-quote key))) - (message "Sequence(TAB for menu): %s" key) + (message "Sequence%s: %s" + (if YaTeX-simple-messages "" "(TAB for menu)") key) (if (catch 'found ;;(1)input string strictly matches with alist