# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1190766747 0
# Node ID a3f296488aca2d027dfc802d8e906a759d02526f
# Parent  003285de78e4e3e1461f24b86a16058f0b60dfb0
(flyspell-delay-commands, flyspell-deplacement-commands):
Use `mapc' rather than `mapcar'.

diff -r 003285de78e4 -r a3f296488aca lisp/textmodes/flyspell.el
--- a/lisp/textmodes/flyspell.el	Wed Sep 26 00:31:44 2007 +0000
+++ b/lisp/textmodes/flyspell.el	Wed Sep 26 00:32:27 2007 +0000
@@ -621,7 +621,7 @@
 ;;*---------------------------------------------------------------------*/
 (defun flyspell-delay-commands ()
   "Install the standard set of Flyspell delayed commands."
-  (mapcar 'flyspell-delay-command flyspell-default-delayed-commands)
+  (mapc 'flyspell-delay-command flyspell-default-delayed-commands)
   (mapcar 'flyspell-delay-command flyspell-delayed-commands))
 
 ;;*---------------------------------------------------------------------*/
@@ -640,7 +640,7 @@
 ;;*---------------------------------------------------------------------*/
 (defun flyspell-deplacement-commands ()
   "Install the standard set of Flyspell deplacement commands."
-  (mapcar 'flyspell-deplacement-command flyspell-default-deplacement-commands)
+  (mapc 'flyspell-deplacement-command flyspell-default-deplacement-commands)
   (mapcar 'flyspell-deplacement-command flyspell-deplacement-commands))
 
 ;;*---------------------------------------------------------------------*/