From mboxrd@z Thu Jan 1 00:00:00 1970 From: Carsten Dominik Subject: Re: org-prefere-future for other applications Date: Mon, 1 Mar 2010 13:40:04 +0100 Message-ID: <11DCBC21-0FEB-41E6-935B-5E4C4ABE151E@gmail.com> References: <87hbp2g8ue.fsf@dasa3.iem.pw.edu.pl> Mime-Version: 1.0 (Apple Message framework v936) Content-Type: text/plain; charset=UTF-8; format=flowed; delsp=yes Content-Transfer-Encoding: quoted-printable Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1Nm4uz-0006D1-T1 for emacs-orgmode@gnu.org; Mon, 01 Mar 2010 07:40:13 -0500 Received: from [140.186.70.92] (port=47779 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Nm4uv-00068w-AP for emacs-orgmode@gnu.org; Mon, 01 Mar 2010 07:40:13 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1Nm4uu-0003aK-Ee for emacs-orgmode@gnu.org; Mon, 01 Mar 2010 07:40:09 -0500 Received: from mail-ew0-f222.google.com ([209.85.219.222]:37235) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Nm4uu-0003aF-AG for emacs-orgmode@gnu.org; Mon, 01 Mar 2010 07:40:08 -0500 Received: by ewy22 with SMTP id 22so1642784ewy.26 for ; Mon, 01 Mar 2010 04:40:07 -0800 (PST) In-Reply-To: <87hbp2g8ue.fsf@dasa3.iem.pw.edu.pl> 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: =?UTF-8?Q?=C5=81ukasz_Stelmach?= Cc: emacs-orgmode@gnu.org On Feb 27, 2010, at 1:29 PM, =C5=81ukasz Stelmach wrote: > Hello. > > I've tried to rearrange org-read-date and some other helper function =20= > to > make them usable from other applications which might not want to =20 > prefere > future dates. Unfortunatelly I can't do it without making org-read-=20 > date > *require* additional argument (prefer-future) everytime it is called =20= > in > orgmode like this: > > (org-read-date ... org-read-date-prefer-future) Ah, may be this is what this is about: (defun org-my-read-date (&optional prefer-future) (let ((org-read-date-prefer-future prefer-future)) (org-read-date))) ????? - Carsten =09=