yatex

diff yatexlib.el @ 380:f061b37c7542

Equalize boundary of non-math environment with math environment.
author HIROSE Yuuji <yuuji@gentei.org>
date Sun, 04 Jan 2015 21:41:00 +0900
parents 1bbd0c2b340f
children c44910b36b95
line diff
     1.1 --- a/yatexlib.el	Sun Jan 04 00:39:44 2015 +0900
     1.2 +++ b/yatexlib.el	Sun Jan 04 21:41:00 2015 +0900
     1.3 @@ -1,7 +1,7 @@
     1.4  ;;; yatexlib.el --- YaTeX and yahtml common libraries
     1.5  ;;; 
     1.6  ;;; (c)1994-2013 by HIROSE Yuuji.[yuuji@yatex.org]
     1.7 -;;; Last modified Sun Jan  4 00:16:04 2015 on firestorm
     1.8 +;;; Last modified Sun Jan  4 21:04:29 2015 on firestorm
     1.9  ;;; $Id$
    1.10  
    1.11  ;;; Code:
    1.12 @@ -1119,7 +1119,7 @@
    1.13  	    (goto-char curp)
    1.14  	    (error "Cannot found the end of current environment."))
    1.15  	(YaTeX-goto-corresponding-environment)
    1.16 -	(beginning-of-line)		;for confirmation
    1.17 +	;;(beginning-of-line)		;for confirmation ;OUT 2015/1/4
    1.18  	(if (< curp (point))
    1.19  	    (progn
    1.20  	      (message "Mark this environment?(y or n): ")
    1.21 @@ -1128,8 +1128,10 @@
    1.22  		(error "Abort.  Please call again at more proper position."))))
    1.23  	(set-mark-command nil)
    1.24  	(YaTeX-goto-corresponding-environment)
    1.25 -	(end-of-line)
    1.26 -	(if (eobp) nil (forward-char 1))))))
    1.27 +	(goto-char (match-end 0))
    1.28 +	;;(end-of-line)				;OUT 2015/1/5
    1.29 +	;;(if (eobp) nil (forward-char 1))	;OUT 2015/1/5
    1.30 +	))))
    1.31  
    1.32  (defun YaTeX-kill-buffer (buffer)
    1.33    "Make effort to show parent buffer after kill."