From mboxrd@z Thu Jan 1 00:00:00 1970 From: Carsten Dominik Subject: Re: [patch] Fix wanderlust in `org-store-link' Date: Mon, 8 Oct 2007 13:21:10 +0200 Message-ID: <0c32459aaac4957bae7d10345a3c0423@science.uva.nl> References: <868x6gezpu.wl%jemarch@gnu.org> Mime-Version: 1.0 (Apple Message framework v624) Content-Type: text/plain; charset=US-ASCII; format=flowed Content-Transfer-Encoding: 7bit Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1Ieqfh-0004VZ-BK for emacs-orgmode@gnu.org; Mon, 08 Oct 2007 07:21:13 -0400 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1Ieqfc-0004Ou-Mv for emacs-orgmode@gnu.org; Mon, 08 Oct 2007 07:21:13 -0400 Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Ieqfc-0004OV-H2 for emacs-orgmode@gnu.org; Mon, 08 Oct 2007 07:21:08 -0400 In-Reply-To: <868x6gezpu.wl%jemarch@gnu.org> 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: jemarch@gnu.org Cc: emacs-orgmode@gnu.org applied, thanks. - Carsten On Oct 6, 2007, at 22:48, jemarch@gnu.org wrote: > > Hello. > > This tiny patch (against org version 5.10b, i didnt found a suitable > CVS repository to get non-released code) fixes `org-store-link' for > wanderlust summary mode. > > In both the latest wanderlust version (2.14.0) and in CVS wanderlust > the function `elmo-message-entity-field' do not return a list, but a > string containing the field contents. > > > 2007-10-06 Jose E. Marchesi > > * org.el (org-store-link): Expect a string from the call to > `elmo-message-entity-field' instead of a list. > > > > --- org.el 2007-10-04 22:34:15.000000000 +0200 > +++ org-foo.el 2007-10-06 22:44:10.000000000 +0200 > @@ -10969,7 +10969,7 @@ > (elmo-msgdb-overview-get-entity > msgnum (wl-summary-buffer-msgdb)))) > (from (wl-summary-line-from)) > - (to (car (elmo-message-entity-field wl-message-entity 'to))) > + (to (elmo-message-entity-field wl-message-entity 'to)) > (subject (let (wl-thr-indent-string wl-parent-message-entity) > (wl-summary-line-subject)))) > (org-store-link-props :type "wl" :from from :to to > > > _______________________________________________ > 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 Dominik Sterrenkundig Instituut "Anton Pannekoek" Universiteit van Amsterdam Kruislaan 403 NL-1098SJ Amsterdam phone: +31 20 525 7477