From: Juanma Barranquero <lekktu@gmail.com>
Date: Wed, 26 Sep 2007 00:24:29 +0000 (+0000)
Subject: (ada-prj-display-page): Use `mapc' rather than `mapcar'.
X-Git-Tag: emacs-pretest-23.0.90~10624
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=88f43129a846b261d4144956bcce59d73e75318b;p=emacs.git

(ada-prj-display-page): Use `mapc' rather than `mapcar'.
---

diff --git a/lisp/progmodes/ada-prj.el b/lisp/progmodes/ada-prj.el
index 7cff0158f8a..b3f059b2b34 100644
--- a/lisp/progmodes/ada-prj.el
+++ b/lisp/progmodes/ada-prj.el
@@ -254,8 +254,8 @@ The current buffer must be the project editing buffer."
       (progn
 	(setq widget-field-new  nil
 	      widget-field-list nil)
-	(mapcar (lambda (x) (delete-overlay x)) (car (overlay-lists)))
-	(mapcar (lambda (x) (delete-overlay x)) (cdr (overlay-lists)))))
+	(mapc (lambda (x) (delete-overlay x)) (car (overlay-lists)))
+	(mapc (lambda (x) (delete-overlay x)) (cdr (overlay-lists)))))
 
   ;;  Display the tabs