patch:org-agenda-refile

patch:org-agenda-refile

[Richard Riley]

Possibly naive, but useful for myself as I tend to follow Bernd's
"refile" policy - just about all new remember items are placed in refile
for later refiling to more relevant locations thus simplifying the
remember item creation process. I have never yet had the situation where
I refiled from the agenda and didnt want my  agenda updated to reflect
that refiling. So ...

----

 diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
 index c68038d..02d7e1e 100644
 --- a/lisp/org-agenda.el
 +++ b/lisp/org-agenda.el
 @@ -6217,7 +6217,8 @@ If this information is not given, the function uses the tree at point."
  	    (widen)
  	    (goto-char marker)
  	    (org-remove-subtree-entries-from-agenda)
 -	    (org-refile goto buffer rfloc)))))))
 +	    (org-refile goto buffer rfloc))))))
 +  (org-agenda-redo))
  
  (defun org-agenda-open-link (&optional arg)
    "Follow the link in the current line, if any.

----

regards

r.

Re: patch:org-agenda-refile

[Carsten Dominik]

Hi Richard,

thanks, I have applied the patch, with the modification that
during bulk refiling, the agenda is only refreshed once, at the end.

- Carsten

On Apr 25, 2010, at 6:32 PM, Richard Riley wrote:

>
> Possibly naive, but useful for myself as I tend to follow Bernd's
> "refile" policy - just about all new remember items are placed in  
> refile
> for later refiling to more relevant locations thus simplifying the
> remember item creation process. I have never yet had the situation  
> where
> I refiled from the agenda and didnt want my  agenda updated to reflect
> that refiling. So ...
>
> ----
>
> diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
> index c68038d..02d7e1e 100644
> --- a/lisp/org-agenda.el
> +++ b/lisp/org-agenda.el
> @@ -6217,7 +6217,8 @@ If this information is not given, the function  
> uses the tree at point."
>  	    (widen)
>  	    (goto-char marker)
>  	    (org-remove-subtree-entries-from-agenda)
> -	    (org-refile goto buffer rfloc)))))))
> +	    (org-refile goto buffer rfloc))))))
> +  (org-agenda-redo))
>
>  (defun org-agenda-open-link (&optional arg)
>    "Follow the link in the current line, if any.
>
> ----
>
> regards
>
> r.
>
>
>
> _______________________________________________
> 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