Mercurial > hgrepos > hgweb.cgi > yatex

changeset 119:34096706b634 dev

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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 wrap: on
line diff
--- a/yatex.el	Fri Nov 20 07:22:01 2009 +0900
+++ b/yatex.el	Wed Dec 23 20:09:22 2009 +0900
@@ -2,8 +2,8 @@
 ;;; Yet Another tex-mode for emacs - //–ì’¹//
 ;;; yatex.el rev. 1.74.1
 ;;; (c)1991-2009 by HIROSE Yuuji.[yuuji@yatex.org]
-;;; Last modified Thu Oct 15 14:27:41 2009 on firestorm
-;;; $Id: yatex.el,v ce2deaceb818 2009/09/28 02:37:27 yuuji $
+;;; Last modified Wed Dec 23 20:05:55 2009 on firestorm
+;;; $Id$
 ;;; The latest version of this software is always available at;
 ;;; http://www.yatex.org/
 
@@ -2205,7 +2205,8 @@
 
 (defun YaTeX-read-section-with-overview ()
   "Read sectioning command with overview.
-This function refers a local variable `source-window' in YaTeX-make-section"
+This function refers a local variable `source-window' in YaTeX-make-section,
+because this function is called with no argument."
   (interactive)
   (require 'yatexsec)			;some case needs this
   (if (> (minibuffer-depth) 1)
@@ -2265,7 +2266,7 @@
 	(beg (make-marker)) (end (make-marker)) old new)
     (if (null where) nil
       (unwind-protect
-	  (progn
+	  (let ((source-window (selected-window)))
 	    (cond
 	     ((equal where 0);;if point is on section command
 	      (set-marker beg (match-beginning 1))

yatex.org