[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))))
(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---
- [Orgmode] [PATCH] Meaningful prompt for org-set-effort,
Gregory J. Grubbs <=