# 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)) ;;*---------------------------------------------------------------------*/