From mboxrd@z Thu Jan 1 00:00:00 1970 From: David Maus Subject: [PATCH] Remove superfluous lambda. Date: Sat, 19 Jun 2010 16:44:15 +0200 Message-ID: <1276958655-31210-1-git-send-email-dmaus@ictsoc.de> References: <1276957723-30376-1-git-send-email-dmaus@ictsoc.de> Return-path: Received: from [140.186.70.92] (port=44672 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1OPzIs-00049f-Um for emacs-orgmode@gnu.org; Sat, 19 Jun 2010 10:45:51 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1OPzIr-0005es-1Q for emacs-orgmode@gnu.org; Sat, 19 Jun 2010 10:45:50 -0400 Received: from mysql1.xlhost.de ([213.202.242.106]:50581) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1OPzIq-0005ej-St for emacs-orgmode@gnu.org; Sat, 19 Jun 2010 10:45:49 -0400 In-Reply-To: <1276957723-30376-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: emacs-orgmode@gnu.org Argh. Just realized that (lambda (e) (car e)) is equivalent to (car e). This one goes on top of the patches. * org-feed.el (org-feed-unescape): Remove superfluous lambda. --- lisp/org-feed.el | 3 +-- 1 files changed, 1 insertions(+), 2 deletions(-) diff --git a/lisp/org-feed.el b/lisp/org-feed.el index 3edcf1a..cda7368 100644 --- a/lisp/org-feed.el +++ b/lisp/org-feed.el @@ -271,8 +271,7 @@ have been saved." (defun org-feed-unescape (s) "Unescape protected entities in S." (let ((re (concat "&\\(" - (mapconcat (lambda (e) - (car e)) xml-entity-alist "\\|") + (mapconcat 'car xml-entity-alist "\\|") "\\);"))) (while (string-match re s) (setq s (replace-match -- 1.7.1