yatex
changeset 119:34096706b634 dev
Bind local variable source-window for YaTeX-read-section-with-overview
in YaTeX-change-section.
author | yuuji@gentei.org |
---|---|
date | Wed, 23 Dec 2009 20:09:22 +0900 |
parents | e1693ffc64cc |
children | 8772bd5d1f02 |
files | yatex.el |
diffstat | 1 files changed, 5 insertions(+), 4 deletions(-) [+] |
line diff
1.1 --- a/yatex.el Fri Nov 20 07:22:01 2009 +0900 1.2 +++ b/yatex.el Wed Dec 23 20:09:22 2009 +0900 1.3 @@ -2,8 +2,8 @@ 1.4 ;;; Yet Another tex-mode for emacs - //–ì’¹// 1.5 ;;; yatex.el rev. 1.74.1 1.6 ;;; (c)1991-2009 by HIROSE Yuuji.[yuuji@yatex.org] 1.7 -;;; Last modified Thu Oct 15 14:27:41 2009 on firestorm 1.8 -;;; $Id: yatex.el,v ce2deaceb818 2009/09/28 02:37:27 yuuji $ 1.9 +;;; Last modified Wed Dec 23 20:05:55 2009 on firestorm 1.10 +;;; $Id$ 1.11 ;;; The latest version of this software is always available at; 1.12 ;;; http://www.yatex.org/ 1.13 1.14 @@ -2205,7 +2205,8 @@ 1.15 1.16 (defun YaTeX-read-section-with-overview () 1.17 "Read sectioning command with overview. 1.18 -This function refers a local variable `source-window' in YaTeX-make-section" 1.19 +This function refers a local variable `source-window' in YaTeX-make-section, 1.20 +because this function is called with no argument." 1.21 (interactive) 1.22 (require 'yatexsec) ;some case needs this 1.23 (if (> (minibuffer-depth) 1) 1.24 @@ -2265,7 +2266,7 @@ 1.25 (beg (make-marker)) (end (make-marker)) old new) 1.26 (if (null where) nil 1.27 (unwind-protect 1.28 - (progn 1.29 + (let ((source-window (selected-window))) 1.30 (cond 1.31 ((equal where 0);;if point is on section command 1.32 (set-marker beg (match-beginning 1))