瀏覽代碼

Remove superfluous lambda.

* org-feed.el (org-feed-unescape): Remove superfluous lambda.
David Maus 15 年之前
父節點
當前提交
dc9222e066
共有 1 個文件被更改,包括 1 次插入2 次删除
  1. 1 2
      lisp/org-feed.el

+ 1 - 2
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