From mboxrd@z Thu Jan 1 00:00:00 1970 From: Jan Seeger Subject: Re: [PATCH] Reverse capture finalize and refile, hack buffer killing. Date: Mon, 05 Oct 2015 11:18:24 +0200 Message-ID: <8737xpbrmn.wl-jan.seeger@thenybble.de> References: <87io71qrbt.wl-jan.seeger@thenybble.de> <87twqjk06p.fsf@nicolasgoaziou.fr> <5F2C244C-C240-4956-9479-7D3301709B47@thenybble.de> <871tdmene3.fsf@nicolasgoaziou.fr> <871tdmmyqy.wl-jan.seeger@thenybble.de> <8737y2cfd5.fsf@nicolasgoaziou.fr> <87zj07klwd.wl-jan.seeger@thenybble.de> <8737xwf7hu.fsf@nicolasgoaziou.fr> Mime-Version: 1.0 (generated by SEMI-EPG 1.14.7 - "Harue") Content-Type: multipart/mixed; boundary="Multipart_Mon_Oct__5_11:18:24_2015-1" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:48390) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Zj1ur-0008SB-NZ for emacs-orgmode@gnu.org; Mon, 05 Oct 2015 05:18:44 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Zj1ul-00035O-NU for emacs-orgmode@gnu.org; Mon, 05 Oct 2015 05:18:41 -0400 Received: from [2a01:488:66:1000:57e6:57cd:0:1] (port=49902 helo=eins.thenybble.de) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Zj1ul-00033n-Co for emacs-orgmode@gnu.org; Mon, 05 Oct 2015 05:18:35 -0400 In-Reply-To: <8737xwf7hu.fsf@nicolasgoaziou.fr> List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Jan Seeger , emacs-orgmode@gnu.org, Nicolas Goaziou --Multipart_Mon_Oct__5_11:18:24_2015-1 Content-Type: text/plain; charset=US-ASCII Hello! That might be because I copy-pasted the patch into an email. Sorry for the delay! I attached the patch. Regards, Jan --Multipart_Mon_Oct__5_11:18:24_2015-1 Content-Type: text/plain; type=patch; name="org-refile-fixes.patch"; charset=US-ASCII Content-Disposition: attachment; filename="org-refile-fixes.patch" Content-Transfer-Encoding: 7bit diff --git a/lisp/org-capture.el b/lisp/org-capture.el index 67dc319..b1cda3d 100644 --- a/lisp/org-capture.el +++ b/lisp/org-capture.el @@ -792,7 +792,10 @@ already gone. Any prefix argument will be passed to the refile command." "Refiling from a capture buffer makes only sense for `entry'-type templates")) (let ((pos (point)) (base (buffer-base-buffer (current-buffer))) - (org-refile-for-capture t)) + (org-refile-for-capture t) + (kill-buffer (org-capture-get :kill-buffer 'local))) + (org-capture-put :kill-buffer nil) + (org-capture-finalize) (save-window-excursion (with-current-buffer (or base (current-buffer)) (save-excursion @@ -800,7 +803,7 @@ already gone. Any prefix argument will be passed to the refile command." (widen) (goto-char pos) (call-interactively 'org-refile))))) - (org-capture-finalize))) + (when kill-buffer (kill-buffer base)))) (defun org-capture-kill () "Abort the current capture process." --Multipart_Mon_Oct__5_11:18:24_2015-1--