;;; ispell.el --- this is the GNU EMACS interface to GNU ISPELL version 4.
-;;Copyright (C) 1990, 1991 Free Software Foundation, Inc.
+;;Copyright (C) 1990, 1991, 1993 Free Software Foundation, Inc.
;; Keywords: wp
(error "Can't find buffer"))
;; Deactivate the mark, because we'll do it anyway if we change something,
;; and a region highlight while in the Ispell loop is distracting.
- (if transient-mark-mode
- (progn
- (setq mark-active nil)
- (run-hooks 'deactivate-mark-hook)))
+ (deactivate-mark)
(save-excursion
(set-buffer buf)
(let ((filename buffer-file-name)