From 820d6e9723c9eeacb7f052ba491d16d393e739b3 Mon Sep 17 00:00:00 2001 From: teranisi Date: Tue, 29 Oct 2002 08:34:49 +0000 Subject: [PATCH] * wl-message.el (wl-message-get-original-buffer): Avoid 'Selecting deleted buffer' error when original buffer is killed. --- wl/ChangeLog | 5 +++++ wl/wl-message.el | 4 +++- 2 files changed, 8 insertions(+), 1 deletion(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index 60f9089..1f5c1f9 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,8 @@ +2002-10-29 Yuuichi Teranishi + + * wl-message.el (wl-message-get-original-buffer): Avoid + 'Selecting deleted buffer' error when original buffer is killed. + 2002-10-26 Yuuichi Teranishi * Version number is increased to 2.11.0. diff --git a/wl/wl-message.el b/wl/wl-message.el index 2e238a8..6ce3e1e 100644 --- a/wl/wl-message.el +++ b/wl/wl-message.el @@ -366,7 +366,9 @@ Returns non-nil if bottom of message." (defun wl-message-get-original-buffer () "Get original buffer for current message buffer." - wl-message-buffer-original-buffer) + (if (buffer-live-p wl-message-buffer-original-buffer) + wl-message-buffer-original-buffer + (wl-original-message-buffer-get (buffer-name (current-buffer))))) (defun wl-message-add-buttons-to-body (start end) (save-excursion -- 1.7.10.4