I don't understand what I'm being prompted for with the current prompt. --8<---------------cut here---------------start------------->8--- diff --git a/lisp/org.el b/lisp/org.el index c5499a3..dcded8e 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -12213,11 +12213,11 @@ allowed value." (if (equal rpl 0) (setq rpl 10)) (if (and (> rpl 0) (<= rpl (length allowed))) (car (nth (1- rpl) allowed)) - (org-completing-read "Value: " allowed nil)))) + (org-completing-read "Effort: " allowed nil)))) (t (let (org-completion-use-ido org-completion-use-iswitchb) (org-completing-read - (concat "Value " (if (and cur (string-match "\\S-" cur)) + (concat "Effort " (if (and cur (string-match "\\S-" cur)) (concat "[" cur "]") "") ": ") existing nil nil "" nil cur)))))) --8<---------------cut here---------------end--------------->8---
_______________________________________________ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode