diff options
| author | Karl Heuer | 1998-10-01 19:23:42 +0000 |
|---|---|---|
| committer | Karl Heuer | 1998-10-01 19:23:42 +0000 |
| commit | fefaefefc124672e89d9d2b0adc332f587361324 (patch) | |
| tree | a1ffdb38cffc897a09052eb2035e1b54ba6d42b3 | |
| parent | 380c917db0d6fd2e7a5bc46986750bf9c1985453 (diff) | |
| download | emacs-fefaefefc124672e89d9d2b0adc332f587361324.tar.gz emacs-fefaefefc124672e89d9d2b0adc332f587361324.zip | |
(check-ispell-version): No need to bind
default-major-mode.
| -rw-r--r-- | lisp/textmodes/ispell.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el index 09b3a4d4028..3ac18011d5a 100644 --- a/lisp/textmodes/ispell.el +++ b/lisp/textmodes/ispell.el | |||
| @@ -1709,10 +1709,8 @@ scrolling the current window. Leave the new window selected." | |||
| 1709 | ;; all versions, since versions earlier than 3.0.09 didn't identify | 1709 | ;; all versions, since versions earlier than 3.0.09 didn't identify |
| 1710 | ;; themselves on startup. | 1710 | ;; themselves on startup. |
| 1711 | (interactive "p") | 1711 | (interactive "p") |
| 1712 | (let (case-fold-search status | 1712 | (let ((result t) |
| 1713 | ;; avoid bugs when syntax of `.' changes in various default modes | 1713 | case-fold-search status) |
| 1714 | (default-major-mode 'fundamental-mode) | ||
| 1715 | (result t)) | ||
| 1716 | (save-excursion | 1714 | (save-excursion |
| 1717 | (set-buffer (get-buffer-create " *ispell-tmp*")) | 1715 | (set-buffer (get-buffer-create " *ispell-tmp*")) |
| 1718 | (setq case-fold-search t) | 1716 | (setq case-fold-search t) |