[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Orgmode] [PATCH] Meaningful prompt for org-set-effort

From: Gregory J. Grubbs
Subject: [Orgmode] [PATCH] Meaningful prompt for org-set-effort
Date: Sat, 14 Nov 2009 10:40:41 -0700
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/23.1.50 (gnu/linux)

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))))
                (let (org-completion-use-ido org-completion-use-iswitchb)
-                  (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---

reply via email to

[Prev in Thread] Current Thread [Next in Thread]