Mercurial > emacs
changeset 4043:6228decc1353
(ispell): Call deactivate-mark instead of setting mark-active directly. Do
this regardless of transient-mark-mode.
author | Roland McGrath <roland@gnu.org> |
---|---|
date | Thu, 08 Jul 1993 22:38:59 +0000 |
parents | 4b4ab64225f7 |
children | ad0643aa3ebf |
files | lisp/textmodes/=ispell4.el |
diffstat | 1 files changed, 2 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/=ispell4.el Thu Jul 08 22:37:42 1993 +0000 +++ b/lisp/textmodes/=ispell4.el Thu Jul 08 22:38:59 1993 +0000 @@ -1,6 +1,6 @@ ;;; 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 @@ -245,10 +245,7 @@ (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)