From 28c0b186cd7c50d8368d93899cf5cfbc5b1329d2 Mon Sep 17 00:00:00 2001 From: keiichi Date: Wed, 18 Nov 1998 03:54:31 +0000 Subject: [PATCH] (message-dont-send): Use `message-delete-frame'. --- lisp/message.el | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/lisp/message.el b/lisp/message.el index bbc718b..49f1953 100644 --- a/lisp/message.el +++ b/lisp/message.el @@ -1972,9 +1972,12 @@ The text will also be indented the normal way." (interactive) (set-buffer-modified-p t) (save-buffer) - (let ((actions message-postpone-actions)) + (let ((actions message-postpone-actions) + (frame (selected-frame)) + (org-frame message-original-frame)) (message-bury (current-buffer)) - (message-do-actions actions))) + (message-do-actions actions) + (message-delete-frame frame org-frame))) (defun message-kill-buffer () "Kill the current buffer." -- 1.7.10.4