diff yatexlib.el @ 56:a9653fbd1c1c

Bug fix version
author yuuji
date Thu, 29 Jun 1995 13:46:57 +0000
parents 2d45e43fb35f
children 3a7c0c2bf16d
line wrap: on
line diff
--- a/yatexlib.el	Thu Jun 29 13:37:36 1995 +0000
+++ b/yatexlib.el	Thu Jun 29 13:46:57 1995 +0000
@@ -2,7 +2,7 @@
 ;;; YaTeX library of general functions.
 ;;; yatexlib.el
 ;;; (c )1994-1995 by HIROSE Yuuji.[yuuji@ae.keio.ac.jp]
-;;; Last modified Fri Feb 17 22:08:23 1995 on VFR
+;;; Last modified Fri Apr 28 16:17:44 1995 on VFR
 ;;; $Id$
 
 ;;;###autoload
@@ -316,8 +316,8 @@
 	  (and (featurep 'windows) (fboundp 'win:adjust-window)
 	       (win:adjust-window))))
        ((and (featurep 'windows) (fboundp 'win:get-buffer-window)
-	     (win:get-buffer-window buffer))
-	(win:switch-window (win:get-buffer-window buffer))
+	     (let ((w (win:get-buffer-window buffer)))
+	       (and w (win:switch-window w))))
 	(select-window (get-buffer-window buffer)))
        (t (switch-to-buffer buffer))))
 )

yatex.org