Browse Source

No ido completion for free prompts in remember templates.

do completion does not work well with values including white space,
which means we cannot use it in completion of values in remember
templates.  This patch turns it off for this application.

Report by Richard Riley.
Carsten Dominik 16 years ago
parent
commit
c60cf93d15
2 changed files with 9 additions and 5 deletions
  1. 3 0
      lisp/ChangeLog
  2. 6 5
      lisp/org-remember.el

+ 3 - 0
lisp/ChangeLog

@@ -1,5 +1,8 @@
 2008-11-18  Carsten Dominik  <carsten.dominik@gmail.com>
 2008-11-18  Carsten Dominik  <carsten.dominik@gmail.com>
 
 
+	* org-remember.el (org-remember-apply-template): No ido
+	completion for free prompts in remember templates.
+
 	* org-id.el (org-id-add-location): Avoid error when no file is
 	* org-id.el (org-id-add-location): Avoid error when no file is
 	given.
 	given.
 
 

+ 6 - 5
lisp/org-remember.el

@@ -530,11 +530,12 @@ to be run from that hook to function properly."
 				   (member char '("u" "U"))
 				   (member char '("u" "U"))
 				   nil nil (list org-end-time-was-given)))
 				   nil nil (list org-end-time-was-given)))
 	   (t
 	   (t
-	    (insert (org-completing-read
-		     (concat (if prompt prompt "Enter string")
-			     (if default (concat " [" default "]"))
-			     ": ")
-		     completions nil nil nil histvar default)))))
+	    (let (org-completion-use-ido)
+	      (insert (org-completing-read
+		       (concat (if prompt prompt "Enter string")
+			       (if default (concat " [" default "]"))
+			       ": ")
+		       completions nil nil nil histvar default))))))
 	(goto-char (point-min))
 	(goto-char (point-min))
 	(if (re-search-forward "%\\?" nil t)
 	(if (re-search-forward "%\\?" nil t)
 	    (replace-match "")
 	    (replace-match "")