From mboxrd@z Thu Jan 1 00:00:00 1970 From: Carsten Dominik Subject: Re: [PATCH] Meaningful prompt for org-set-effort Date: Sun, 15 Nov 2009 14:27:43 +0100 Message-ID: <709E4DA4-6EF8-4996-8801-7A1B46569F63@gmail.com> References: <87iqddypgm.fsf@dynapse.com> Mime-Version: 1.0 (Apple Message framework v936) Content-Type: text/plain; charset=US-ASCII; format=flowed; delsp=yes Content-Transfer-Encoding: 7bit Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1N9f8z-0006pS-04 for emacs-orgmode@gnu.org; Sun, 15 Nov 2009 08:27:53 -0500 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1N9f8u-0006ki-69 for emacs-orgmode@gnu.org; Sun, 15 Nov 2009 08:27:52 -0500 Received: from [199.232.76.173] (port=56265 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1N9f8t-0006kS-Ua for emacs-orgmode@gnu.org; Sun, 15 Nov 2009 08:27:47 -0500 Received: from ey-out-1920.google.com ([74.125.78.144]:55594) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1N9f8t-0000Ck-ED for emacs-orgmode@gnu.org; Sun, 15 Nov 2009 08:27:47 -0500 Received: by ey-out-1920.google.com with SMTP id 4so971294eyg.2 for ; Sun, 15 Nov 2009 05:27:46 -0800 (PST) In-Reply-To: <87iqddypgm.fsf@dynapse.com> List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: "Gregory J. Grubbs" Cc: emacs-orgmode@gnu.org Applied, thanks. - Carsten On Nov 14, 2009, at 6:40 PM, Gregory J. Grubbs wrote: > 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 - Carsten