# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1192171213 0
# Node ID d24cbe9e2e2daab76ec22b295694698e8919535c
# Parent  dae14770f516bec82b6f06cb540e28614fccc0e1
(org-publish-get-plist-from-filename): Use mapc rather than mapcar.

diff -r dae14770f516 -r d24cbe9e2e2d lisp/textmodes/org-publish.el
--- a/lisp/textmodes/org-publish.el	Fri Oct 12 06:39:21 2007 +0000
+++ b/lisp/textmodes/org-publish.el	Fri Oct 12 06:40:13 2007 +0000
@@ -426,7 +426,7 @@
 (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)