Mercurial > emacs
comparison lisp/textmodes/=ispell4.el @ 4105:230eede21566
(ispell-menu-map): Add missing quote in defalias.
(ispell-window-configuration): Initialize to nil.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 15 Jul 1993 06:55:39 +0000 |
parents | d7f5f18ddbc5 |
children | aaf846efe4cb |
comparison
equal
deleted
inserted
replaced
4104:d42fc10d9c96 | 4105:230eede21566 |
---|---|
60 ;be on the bad-words list | 60 ;be on the bad-words list |
61 (defvar ispell-recently-accepted nil) | 61 (defvar ispell-recently-accepted nil) |
62 | 62 |
63 ;; Non-nil means we have started showing an alternatives window. | 63 ;; Non-nil means we have started showing an alternatives window. |
64 ;; This is the window config from before then. | 64 ;; This is the window config from before then. |
65 (defvar ispell-window-configuration) | 65 (defvar ispell-window-configuration nil) |
66 | 66 |
67 ;t when :dump command needed | 67 ;t when :dump command needed |
68 (defvar ispell-dump-needed nil) | 68 (defvar ispell-dump-needed nil) |
69 | 69 |
70 (defun ispell-flush-bad-words () | 70 (defun ispell-flush-bad-words () |
212 | 212 |
213 (defun ispell-tex-buffer-p () | 213 (defun ispell-tex-buffer-p () |
214 (memq major-mode '(plain-TeX-mode LaTeX-mode))) | 214 (memq major-mode '(plain-TeX-mode LaTeX-mode))) |
215 | 215 |
216 (defvar ispell-menu-map (make-sparse-keymap "Spell")) | 216 (defvar ispell-menu-map (make-sparse-keymap "Spell")) |
217 (defalias ispell-menu-map ispell-menu-map) | 217 (defalias 'ispell-menu-map ispell-menu-map) |
218 | 218 |
219 (define-key ispell-menu-map [reload-ispell] | 219 (define-key ispell-menu-map [reload-ispell] |
220 '("Reload Dictionary" . reload-ispell)) | 220 '("Reload Dictionary" . reload-ispell)) |
221 | 221 |
222 (define-key ispell-menu-map [ispell-next] | 222 (define-key ispell-menu-map [ispell-next] |