From: Glenn Morris <rgm@gnu.org>
Date: Mon, 29 Oct 2007 07:30:06 +0000 (+0000)
Subject: (org-publish-get-plist-from-filename):
X-Git-Tag: emacs-pretest-23.0.90~9994
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3fcff82f1f1f60050c36996df3760ac59806ea0b;p=emacs.git

(org-publish-get-plist-from-filename):
Use mapc rather than mapcar (reinstall change deleted without log
entry 2007-10-22).
---

diff --git a/lisp/textmodes/org-publish.el b/lisp/textmodes/org-publish.el
index 26dc409e19c..e98afaf4a6b 100644
--- a/lisp/textmodes/org-publish.el
+++ b/lisp/textmodes/org-publish.el
@@ -426,7 +426,7 @@ nil if not found."
 (defun org-publish-get-plist-from-filename (filename)
   "Return publishing configuration plist for file FILENAME."
   (let ((found nil))
-    (mapcar
+    (mapc
      (lambda (plist)
        (let ((files (org-publish-get-base-files plist)))
  	 (if (member (expand-file-name filename) files)