summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lisp/gnus/ChangeLog2
-rw-r--r--lisp/gnus/gnus-dired.el4
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 14f7092b6b9..c90dc7c77c2 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,5 +1,7 @@
2010-10-13 Katsumi Yamaoka <yamaoka@jpl.org>
+ * gnus-dired.el (gnus-dired-attach): Silence XEmacs 21.5 when compiling.
+
* gnus-gravatar.el (gnus-gravatar-transform-address): Adjust avatars'
position when (X-)Faces exist.
(gnus-treat-from-gravatar, gnus-treat-mail-gravatar): Force displaying
diff --git a/lisp/gnus/gnus-dired.el b/lisp/gnus/gnus-dired.el
index da20c66ddbc..a12046f73b8 100644
--- a/lisp/gnus/gnus-dired.el
+++ b/lisp/gnus/gnus-dired.el
@@ -133,7 +133,9 @@ filenames."
(mapcar
;; don't attach directories
(lambda (f) (if (file-directory-p f) nil f))
- (nreverse (dired-map-over-marks (dired-get-filename) nil))))))
+ (nreverse
+ (let ((arg nil)) ;; Silence XEmacs 21.5 when compiling.
+ (dired-map-over-marks (dired-get-filename) arg)))))))
(let ((destination nil)
(files-str nil)
(bufs nil))