comparison lisp/textmodes/flyspell.el @ 94474:9e177181ff37

(flyspell-mode-on): Remove redundant (flyspell-mode-hook) run. (flyspell-mode): Fix docstring in definition.
author Agustin Martin <agustin.martin@hispalinux.es>
date Tue, 29 Apr 2008 10:55:35 +0000
parents e0b01f455de0
children f4a69fedbd46
comparison
equal deleted inserted replaced
94473:377add9b3eb4 94474:9e177181ff37
478 \\[flyspell-auto-correct-word]: automatically correct word. 478 \\[flyspell-auto-correct-word]: automatically correct word.
479 \\[flyspell-auto-correct-previous-word]: automatically correct the last misspelled word. 479 \\[flyspell-auto-correct-previous-word]: automatically correct the last misspelled word.
480 \\[flyspell-correct-word] (or down-mouse-2): popup correct words. 480 \\[flyspell-correct-word] (or down-mouse-2): popup correct words.
481 481
482 Hooks: 482 Hooks:
483 This runs `flyspell-mode-hook' after flyspell is entered. 483 This runs `flyspell-mode-hook' after flyspell mode is entered or exit.
484 484
485 Remark: 485 Remark:
486 `flyspell-mode' uses `ispell-mode'. Thus all Ispell options are 486 `flyspell-mode' uses `ispell-mode'. Thus all Ispell options are
487 valid. For instance, a personal dictionary can be used by 487 valid. For instance, a personal dictionary can be used by
488 invoking `ispell-change-dictionary'. 488 invoking `ispell-change-dictionary'.
616 nil 'non-ascii))) 616 nil 'non-ascii)))
617 (message "%s" 617 (message "%s"
618 (if binding 618 (if binding
619 (format "Welcome to flyspell. Use %s or Mouse-2 to correct words." 619 (format "Welcome to flyspell. Use %s or Mouse-2 to correct words."
620 (key-description binding)) 620 (key-description binding))
621 "Welcome to flyspell. Use Mouse-2 to correct words.")))) 621 "Welcome to flyspell. Use Mouse-2 to correct words.")))))
622 ;; we end with the flyspell hooks
623 (run-hooks 'flyspell-mode-hook))
624 622
625 ;;*---------------------------------------------------------------------*/ 623 ;;*---------------------------------------------------------------------*/
626 ;;* flyspell-delay-commands ... */ 624 ;;* flyspell-delay-commands ... */
627 ;;*---------------------------------------------------------------------*/ 625 ;;*---------------------------------------------------------------------*/
628 (defun flyspell-delay-commands () 626 (defun flyspell-delay-commands ()