lisp/url/url-cookie.el: Use `dolist' rather than `mapcar'.

2 files changed, 7 insertions, 3 deletions

diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog
index 3c7b8b6abe7..075d9fae3e0 100644
--- a/lisp/url/ChangeLog
+++ b/lisp/url/ChangeLog
@@ -1,3 +1,8 @@
+2011-04-01  Juanma Barranquero  <lekktu@gmail.com>
+
+        * url-cookie.el (url-cookie-handle-set-cookie):
+        Use `dolist' rather than `mapcar'.
+
 2011-02-12  Teodor Zlatanov  <tzz@lifelogs.com>
 
         * url-parse.el (url-bit-for-url, url-user-for-url)
diff --git a/lisp/url/url-cookie.el b/lisp/url/url-cookie.el
index c55063dfba9..7fdd8b174c1 100644
--- a/lisp/url/url-cookie.el
+++ b/lisp/url/url-cookie.el
@@ -331,9 +331,8 @@ telling Microsoft that."
            (not trusted)
            (save-window-excursion
              (with-output-to-temp-buffer "*Cookie Warning*"
-               (mapcar
-                (lambda (x)
-                  (princ (format "%s - %s" (car x) (cdr x)))) rest))
+               (dolist (x rest)
+                 (princ (format "%s - %s" (car x) (cdr x)))))
              (prog1
                  (not (funcall url-confirmation-func
                                (format "Allow %s to set these cookies? "