diff options
| author | Miles Bader | 2000-11-12 13:26:15 +0000 |
|---|---|---|
| committer | Miles Bader | 2000-11-12 13:26:15 +0000 |
| commit | f5ed37df73ab7f50be82c9d2e2a80d68f928df19 (patch) | |
| tree | c1e706f83e2f03f06f4f3be784e8c772571827a2 /lisp/textmodes | |
| parent | 0b074c2fe77c2305c90341cc3826d43549306762 (diff) | |
| download | emacs-f5ed37df73ab7f50be82c9d2e2a80d68f928df19.tar.gz emacs-f5ed37df73ab7f50be82c9d2e2a80d68f928df19.zip | |
(flyspell-mode-on): Only output welcome message if interactive.
Diffstat (limited to 'lisp/textmodes')
| -rw-r--r-- | lisp/textmodes/flyspell.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el index 74c07f19602..8854633d58f 100644 --- a/lisp/textmodes/flyspell.el +++ b/lisp/textmodes/flyspell.el | |||
| @@ -529,7 +529,7 @@ flyspell-buffer checks the whole buffer." | |||
| 529 | (set-keymap-parent map (current-local-map)) | 529 | (set-keymap-parent map (current-local-map)) |
| 530 | map)) | 530 | map)) |
| 531 | ;; the welcome message | 531 | ;; the welcome message |
| 532 | (if flyspell-issue-welcome-flag | 532 | (if (and flyspell-issue-welcome-flag (interactive-p)) |
| 533 | (let ((binding (where-is-internal 'flyspell-auto-correct-word | 533 | (let ((binding (where-is-internal 'flyspell-auto-correct-word |
| 534 | nil 'non-ascii))) | 534 | nil 'non-ascii))) |
| 535 | (message | 535 | (message |