From mboxrd@z Thu Jan 1 00:00:00 1970 From: Carsten Dominik Subject: Re: icalendar: exporting times of day specified in heading? Date: Wed, 17 Mar 2010 16:55:53 +0100 Message-ID: <7D6E9C9E-6E1D-445F-BEF7-2F817FEBEF4F@gmail.com> References: <15490.1263652716@cpc1-cmbg14-2-0-cust6.5-4.cable.virginmedia.com> <11681.1265116614@maps> <87ocinuljo.fsf@fastmail.fm> <5606.1268833242@maps> <6670.1268839728@maps> 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 1NrvbN-0002g6-4j for emacs-orgmode@gnu.org; Wed, 17 Mar 2010 11:56:09 -0400 Received: from [140.186.70.92] (port=36638 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1NrvbF-0002ck-SC for emacs-orgmode@gnu.org; Wed, 17 Mar 2010 11:56:08 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1NrvbA-0007O4-7Q for emacs-orgmode@gnu.org; Wed, 17 Mar 2010 11:55:57 -0400 Received: from mail-ew0-f227.google.com ([209.85.219.227]:44891) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1NrvbA-0007Nx-2x for emacs-orgmode@gnu.org; Wed, 17 Mar 2010 11:55:56 -0400 Received: by ewy27 with SMTP id 27so584712ewy.14 for ; Wed, 17 Mar 2010 08:55:55 -0700 (PDT) In-Reply-To: <6670.1268839728@maps> 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: Stephen Eglen Cc: Matt Lundin , emacs-orgmode@gnu.org Applied, thanks. Stephen, woudl you ming changing your diff format to diff -u ? Somehow I have problems to apply your patches (already earlier...) Thanks - Carsten On Mar 17, 2010, at 4:28 PM, Stephen Eglen wrote: > Ok, here is a patch that introduces a new variable so that the code to > extract times from diary entries entered using 'i d' is off by > default. > > 2010-03-17 Stephen Eglen > > * org-agenda.el (org-agenda-insert-diary-extract-time): New > variable. > (org-agenda-add-entry-to-org-agenda-diary-file): Use this new > variable rather than org-agenda-search-headline-for-time. > > *** /tmp/ediff23195Zk 2010-03-17 15:22:42.000000000 +0000 > --- /home/stephen/langs/emacs/elisp-ds/org-mode/lisp/org-agenda.el > 2010-03-17 15:20:56.000000000 +0000 > *************** > *** 7066,7071 **** > --- 7066,7076 ---- > (const :tag "in a date tree" date-tree) > (const :tag "as top level at end of file" top-level))) > > + (defcustom org-agenda-insert-diary-extract-time nil > + "Non-nil means extract any time specification from the diary > entry." > + :group 'org-agenda > + :type 'boolean) > + > (defun org-agenda-add-entry-to-org-agenda-diary-file (type text > &optional d1 d2) > "Add a diary entry with TYPE to `org-agenda-diary-file'. > If TEXT is not empty, it will become the headline of the new entry, > and > *************** > *** 7103,7109 **** > (let* > (fmt time time2 > (org-agenda-time-leading-zero t)) > ! (if org-agenda-search-headline-for-time > ;; Use org-format-agenda-item to parse text for a time-range and > ;; remove it. > (setq fmt (org-format-agenda-item nil text nil nil t) > --- 7108,7114 ---- > (let* > (fmt time time2 > (org-agenda-time-leading-zero t)) > ! (if org-agenda-insert-diary-extract-time > ;; Use org-format-agenda-item to parse text for a time-range and > ;; remove it. > (setq fmt (org-format-agenda-item nil text nil nil t) - Carsten