From: kate <kate>
Date: Sat, 20 Jul 2002 08:15:58 +0000 (+0000)
Subject: Modified Files:
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=42274ad7a177f9a950d79e3241592c07a0ce725d;p=elisp%2Ftamago.git

Modified Files:
tamago/ChangeLog tamago/egg.el

Mr. SAITO Takuya contributes this patch.
---

diff --git a/ChangeLog b/ChangeLog
index 6bc2b6b..06ee86b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2002-07-20  SAITO Takuya <reed@lily.freemail.ne.jp>
+
+	* egg.el (egg-activate-keymap-after-command): set-buffer to
+	killed buffer.
+
 2001-05-22  KATAYAMA Yoshio <kate@pfu.fujitsu.com>
 
 	* its.el (its-delete-by-character): New customizable variable.
diff --git a/egg.el b/egg.el
index 7bd4f3c..3bb95e7 100644
--- a/egg.el
+++ b/egg.el
@@ -118,8 +118,9 @@
 (defun egg-activate-keymap-after-command ()
   (while egg-change-major-mode-buffer
     (save-excursion
-      (set-buffer (car egg-change-major-mode-buffer))
-      (egg-activate-keymap)
+      (when (buffer-live-p (car egg-change-major-mode-buffer))
+	(set-buffer (car egg-change-major-mode-buffer))
+	(egg-activate-keymap))
       (setq egg-change-major-mode-buffer (cdr egg-change-major-mode-buffer))))
   (remove-hook 'post-command-hook 'egg-activate-keymap-after-command))