yatex
diff yatexlib.el @ 234:b75390dd4260
C-j can skip further parameter input for table/figure environment.
author | yuuji@gentei.org |
---|---|
date | Sat, 28 Jan 2012 11:16:11 +0900 |
parents | 60844b664f54 |
children | af1e6c48eac0 |
line diff
1.1 --- a/yatexlib.el Mon Jan 23 00:11:31 2012 +0900 1.2 +++ b/yatexlib.el Sat Jan 28 11:16:11 2012 +0900 1.3 @@ -2,7 +2,7 @@ 1.4 ;;; YaTeX and yahtml common libraries, general functions and definitions 1.5 ;;; yatexlib.el 1.6 ;;; (c)1994-2012 by HIROSE Yuuji.[yuuji@yatex.org] 1.7 -;;; Last modified Mon Jan 23 00:10:51 2012 on firestorm 1.8 +;;; Last modified Sat Jan 28 11:02:48 2012 on firestorm 1.9 ;;; $Id$ 1.10 1.11 ;; General variables 1.12 @@ -752,6 +752,12 @@ 1.13 (read-with-history-in hsym prompt init)) 1.14 (t (read-string prompt init)))) 1.15 1.16 +(defvar YaTeX-skip-next-reader-char ?\C-j) 1.17 +(defun YaTeX-skip-next-reader-p () 1.18 + "Check if the next string-reader should be skip." 1.19 + (if (equal last-input-char YaTeX-skip-next-reader-char) 1.20 + "" nil)) 1.21 + 1.22 ;;;###autoload 1.23 (fset 'YaTeX-rassoc 1.24 (if (and nil (fboundp 'rassoc) (subrp (symbol-function 'rassoc)))