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]