From 3db32c62e94a8bc1666110233801a37d7fe9ccb4 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Wed, 18 Nov 1998 03:55:30 +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 192bce3..9e4f83f 100644 --- a/lisp/message.el +++ b/lisp/message.el @@ -2148,9 +2148,12 @@ The text will also be indented the normal way." "Don't send the message you have been editing." (interactive) (message-save-drafts) - (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