diff yatexlib.el @ 234:b75390dd4260 dev

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 wrap: on
line diff
--- a/yatexlib.el	Sat Jan 28 10:22:08 2012 +0900
+++ b/yatexlib.el	Sat Jan 28 11:16:11 2012 +0900
@@ -2,7 +2,7 @@
 ;;; YaTeX and yahtml common libraries, general functions and definitions
 ;;; yatexlib.el
 ;;; (c)1994-2012 by HIROSE Yuuji.[yuuji@yatex.org]
-;;; Last modified Mon Jan 23 00:10:51 2012 on firestorm
+;;; Last modified Sat Jan 28 11:02:48 2012 on firestorm
 ;;; $Id$
 
 ;; General variables
@@ -752,6 +752,12 @@
     (read-with-history-in hsym prompt init))
    (t (read-string prompt init))))
 
+(defvar YaTeX-skip-next-reader-char ?\C-j)
+(defun YaTeX-skip-next-reader-p ()
+  "Check if the next string-reader should be skip."
+  (if (equal last-input-char YaTeX-skip-next-reader-char)
+      "" nil))
+
 ;;;###autoload
 (fset 'YaTeX-rassoc
       (if (and nil (fboundp 'rassoc) (subrp (symbol-function 'rassoc)))

yatex.org