Mercurial > emacs
changeset 23308:2fe1a52e6932
(check-ispell-version): Ensure same buffer is current
when let-binding of case-fold-search ends.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Wed, 23 Sep 1998 22:22:45 +0000 |
| parents | 5d6530954ece |
| children | 1c0f33283d1f |
| files | lisp/textmodes/ispell.el |
| diffstat | 1 files changed, 5 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/ispell.el Wed Sep 23 22:11:56 1998 +0000 +++ b/lisp/textmodes/ispell.el Wed Sep 23 22:22:45 1998 +0000 @@ -1709,11 +1709,11 @@ ;; all versions, since versions earlier than 3.0.09 didn't identify ;; themselves on startup. (interactive "p") - (save-excursion - (let (case-fold-search status - ;; avoid bugs when syntax of `.' changes in various default modes - (default-major-mode 'fundamental-mode) - (result t)) + (let (case-fold-search status + ;; avoid bugs when syntax of `.' changes in various default modes + (default-major-mode 'fundamental-mode) + (result t)) + (save-excursion (set-buffer (get-buffer-create " *ispell-tmp*")) (setq case-fold-search t) (erase-buffer)