aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/textmodes
diff options
context:
space:
mode:
authorGlenn Morris2007-10-12 06:41:15 +0000
committerGlenn Morris2007-10-12 06:41:15 +0000
commitb6064d523071a2a92f8499302fe0d62aed498500 (patch)
treea472467dd692fbe5d37ba06ecc25d09e39198ca1 /lisp/textmodes
parent551e625ffe12c7189ac631326dc8d4a7f06d8b0f (diff)
downloademacs-b6064d523071a2a92f8499302fe0d62aed498500.tar.gz
emacs-b6064d523071a2a92f8499302fe0d62aed498500.zip
(org-publish-get-plist-from-filename): Use mapc rather than mapcar.
Diffstat (limited to 'lisp/textmodes')
-rw-r--r--lisp/textmodes/org-publish.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/textmodes/org-publish.el b/lisp/textmodes/org-publish.el
index a72b477d0b2..bc45a7d9941 100644
--- a/lisp/textmodes/org-publish.el
+++ b/lisp/textmodes/org-publish.el
@@ -426,7 +426,7 @@ nil if not found."
426(defun org-publish-get-plist-from-filename (filename) 426(defun org-publish-get-plist-from-filename (filename)
427 "Return publishing configuration plist for file FILENAME." 427 "Return publishing configuration plist for file FILENAME."
428 (let ((found nil)) 428 (let ((found nil))
429 (mapcar 429 (mapc
430 (lambda (plist) 430 (lambda (plist)
431 (let ((files (org-publish-get-base-files plist))) 431 (let ((files (org-publish-get-base-files plist)))
432 (if (member (expand-file-name filename) files) 432 (if (member (expand-file-name filename) files)