From mboxrd@z Thu Jan 1 00:00:00 1970 From: Carsten Dominik Subject: Re: [PATCH] Fix goto last refile location Date: Sat, 20 Feb 2010 20:37:06 +0100 Message-ID: <0B0A3767-452D-46B0-8AF2-C8D15AD5768F@gmail.com> References: <1266688205-28536-1-git-send-email-bernt@norang.ca> Mime-Version: 1.0 (Apple Message framework v936) Content-Type: text/plain; charset=US-ASCII; format=flowed; delsp=yes Content-Transfer-Encoding: 7bit Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1Niv8Z-0004Uy-Cn for emacs-orgmode@gnu.org; Sat, 20 Feb 2010 14:37:11 -0500 Received: from [140.186.70.92] (port=48594 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Niv8Y-0004T3-Gq for emacs-orgmode@gnu.org; Sat, 20 Feb 2010 14:37:10 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1Niv8X-0000js-KY for emacs-orgmode@gnu.org; Sat, 20 Feb 2010 14:37:10 -0500 Received: from mail-ew0-f228.google.com ([209.85.219.228]:57938) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Niv8X-0000ji-Ep for emacs-orgmode@gnu.org; Sat, 20 Feb 2010 14:37:09 -0500 Received: by ewy28 with SMTP id 28so1234664ewy.8 for ; Sat, 20 Feb 2010 11:37:08 -0800 (PST) In-Reply-To: <1266688205-28536-1-git-send-email-bernt@norang.ca> List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Bernt Hansen Cc: emacs-orgmode@gnu.org Applied, thanks. - Carsten On Feb 20, 2010, at 6:50 PM, Bernt Hansen wrote: > Move the marker for the last refile location to the heading instead > of at the > end of the entry. This was causing C-u C-u C-c C-w to end up on the > heading > following the newly refiled entry. > --- > This uses the same mechanism that remember mode uses for bookmarking > the last > stored location. I originally had a save-excursion and org-back-to- > heading > call before setting the bookmark but this seems to work probably due > to a > side-effect. > > lisp/org.el | 3 ++- > 1 files changed, 2 insertions(+), 1 deletions(-) > > diff --git a/lisp/org.el b/lisp/org.el > index e5b2f56..8ba782a 100644 > --- a/lisp/org.el > +++ b/lisp/org.el > @@ -9399,8 +9399,9 @@ See also `org-refile-use-outline-path' and > `org-completion-use-ido'" > (goto-char (point-min)) > (or (outline-next-heading) (goto-char (point-max))))) > (if (not (bolp)) (newline)) > - (bookmark-set "org-refile-last-stored") > (org-paste-subtree level) > + (and org-auto-align-tags (org-set-tags nil t)) > + (bookmark-set "org-refile-last-stored") > (if (fboundp 'deactivate-mark) (deactivate-mark)) > (run-hooks 'org-after-refile-insert-hook)))) > (if regionp > -- > 1.7.0.14.g7e948 > > > > _______________________________________________ > Emacs-orgmode mailing list > Please use `Reply All' to send replies to the list. > Emacs-orgmode@gnu.org > http://lists.gnu.org/mailman/listinfo/emacs-orgmode - Carsten