yatex
diff yatexlib.el @ 388:ad62fb00a393
Update command names
author | HIROSE Yuuji <yuuji@gentei.org> |
---|---|
date | Wed, 07 Jan 2015 09:09:15 +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 Wed Jan 07 09:09:15 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."