diff options
| -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) |