Re: patch to org-refile for more accurate completing-read

[Le Wang <l26wang@gmail.com>]

[-- Attachment #1.1: Type: text/plain, Size: 672 bytes --]

Sure.

On Sat, Jan 28, 2012 at 7:42 AM, Bernt Hansen <bernt@norang.ca> wrote:

> Le Wang <l26wang@gmail.com> writes:
>
> > Here: https://gist.github.com/1689071
> >
> > When we are using using refile as navigation, require must-match
> > regardless of org-refile-allow-creating-parent-nodes.
>
> Hi,
>
> I suggest you post the patch to the mailing list as an attachment so
>  1) we can read it inline and comment on it without having to go find
>     it on the web
>  2) it will get automatically picked up by the patchwork patch tracker
>     so it can be easily applied to the source
>  3) it will forever be in the mailing list archive
>
> Regards,
> Bernt
>



-- 
Le

[-- Attachment #1.2: Type: text/html, Size: 1151 bytes --]

[-- Attachment #2: org.el.diff --]
[-- Type: application/octet-stream, Size: 459 bytes --]

diff --git a/lisp/org.el b/lisp/org.el
index 7a68b73..ccdcace 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -10625,7 +10625,8 @@ prefix argument (`C-u C-u C-u C-c C-w')."
 				       (t (concat "Refile subtree \""
 						  heading-text "\" to")))
 				 default-buffer
-				 org-refile-allow-creating-parent-nodes
+				 (and (not (equal '(4) goto))
+				      org-refile-allow-creating-parent-nodes)
 				 goto))))))
 	  (setq file (nth 1 it)
 		re (nth 2 it)