diff options
| author | Juanma Barranquero | 2007-09-26 00:32:27 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2007-09-26 00:32:27 +0000 |
| commit | 6c3bce72f81c39a71578176e7a12eb92f0c8cede (patch) | |
| tree | f9d888ab955ef2c88d212b6807ecb398abc91600 | |
| parent | b5242984f98edf4fc7b81d5a1b37fdcebcae2519 (diff) | |
| download | emacs-6c3bce72f81c39a71578176e7a12eb92f0c8cede.tar.gz emacs-6c3bce72f81c39a71578176e7a12eb92f0c8cede.zip | |
(flyspell-delay-commands, flyspell-deplacement-commands):
Use `mapc' rather than `mapcar'.
| -rw-r--r-- | lisp/textmodes/flyspell.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el index 9d5c7868d13..1f8e1d5388d 100644 --- a/lisp/textmodes/flyspell.el +++ b/lisp/textmodes/flyspell.el | |||
| @@ -621,7 +621,7 @@ in your .emacs file. | |||
| 621 | ;;*---------------------------------------------------------------------*/ | 621 | ;;*---------------------------------------------------------------------*/ |
| 622 | (defun flyspell-delay-commands () | 622 | (defun flyspell-delay-commands () |
| 623 | "Install the standard set of Flyspell delayed commands." | 623 | "Install the standard set of Flyspell delayed commands." |
| 624 | (mapcar 'flyspell-delay-command flyspell-default-delayed-commands) | 624 | (mapc 'flyspell-delay-command flyspell-default-delayed-commands) |
| 625 | (mapcar 'flyspell-delay-command flyspell-delayed-commands)) | 625 | (mapcar 'flyspell-delay-command flyspell-delayed-commands)) |
| 626 | 626 | ||
| 627 | ;;*---------------------------------------------------------------------*/ | 627 | ;;*---------------------------------------------------------------------*/ |
| @@ -640,7 +640,7 @@ It will be checked only after `flyspell-delay' seconds." | |||
| 640 | ;;*---------------------------------------------------------------------*/ | 640 | ;;*---------------------------------------------------------------------*/ |
| 641 | (defun flyspell-deplacement-commands () | 641 | (defun flyspell-deplacement-commands () |
| 642 | "Install the standard set of Flyspell deplacement commands." | 642 | "Install the standard set of Flyspell deplacement commands." |
| 643 | (mapcar 'flyspell-deplacement-command flyspell-default-deplacement-commands) | 643 | (mapc 'flyspell-deplacement-command flyspell-default-deplacement-commands) |
| 644 | (mapcar 'flyspell-deplacement-command flyspell-deplacement-commands)) | 644 | (mapcar 'flyspell-deplacement-command flyspell-deplacement-commands)) |
| 645 | 645 | ||
| 646 | ;;*---------------------------------------------------------------------*/ | 646 | ;;*---------------------------------------------------------------------*/ |