From mboxrd@z Thu Jan 1 00:00:00 1970 From: Carsten Dominik Subject: Re: [PATCH 1/2] Load XML library if necessary. Date: Wed, 7 Jul 2010 08:50:48 +0200 Message-ID: <88DBF62D-1CCD-4772-8E68-067586049CE0@gmail.com> References: <1278483744-8255-1-git-send-email-dmaus@ictsoc.de> 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 [140.186.70.92] (port=35319 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1OWOT8-0004ex-1k for emacs-orgmode@gnu.org; Wed, 07 Jul 2010 02:50:55 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1OWOT6-0002z2-La for emacs-orgmode@gnu.org; Wed, 07 Jul 2010 02:50:53 -0400 Received: from mail-ey0-f169.google.com ([209.85.215.169]:35056) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1OWOT6-0002yt-Fx for emacs-orgmode@gnu.org; Wed, 07 Jul 2010 02:50:52 -0400 Received: by eydd26 with SMTP id d26so194597eyd.0 for ; Tue, 06 Jul 2010 23:50:51 -0700 (PDT) In-Reply-To: <1278483744-8255-1-git-send-email-dmaus@ictsoc.de> 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: David Maus Cc: emacs-orgmode@gnu.org Appied, thanks. - Carsten On Jul 7, 2010, at 8:22 AM, David Maus wrote: > * org-feed.el (org-feed-unescape, org-feed-parse-atom-feed): Load XML > library if necessary. > > Function that use xml.el must require 'xml to make sure it is loaded > at runtime. > --- > lisp/org-feed.el | 2 ++ > 1 files changed, 2 insertions(+), 0 deletions(-) > > diff --git a/lisp/org-feed.el b/lisp/org-feed.el > index 999bfd8..e41ad97 100644 > --- a/lisp/org-feed.el > +++ b/lisp/org-feed.el > @@ -270,6 +270,7 @@ have been saved." > > (defun org-feed-unescape (s) > "Unescape protected entities in S." > + (require 'xml) > (let ((re (concat "&\\(" > (mapconcat 'car xml-entity-alist "\\|") > "\\);"))) > @@ -630,6 +631,7 @@ containing the properties `:guid' and `:item- > full-text'. > > The `:item-full-text' property actually contains the sexp > formatted as a string, not the original XML data." > + (require 'xml) > (with-current-buffer buffer > (widen) > (let ((feed (car (xml-parse-region (point-min) (point-max))))) > -- > 1.7.1 > > > _______________________________________________ > Emacs-orgmode mailing list > Please use `Reply All' to send replies to the list. > Emacs-orgmode@gnu.org > http://lists.gnu.org/mailman/listinfo/emacs-orgmode - Carsten