From: Karl Heuer <kwzh@gnu.org>
Date: Tue, 25 Apr 1995 22:32:36 +0000 (+0000)
Subject: (delete-selection-mode): Use force-mode-line-update.
X-Git-Tag: emacs-19.34~4269
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2fc86734b718a834630ffbfbad4157b7cd42f71c;p=emacs.git

(delete-selection-mode): Use force-mode-line-update.
---

diff --git a/lisp/delsel.el b/lisp/delsel.el
index 2294df5ac67..4d52ab2f7ba 100644
--- a/lisp/delsel.el
+++ b/lisp/delsel.el
@@ -84,7 +84,7 @@ When OFF, typed text is just inserted at point."
   (setq delete-selection-mode
 	(if (null arg) (not delete-selection-mode)
 	  (> (prefix-numeric-value arg) 0)))
-  (set-buffer-modified-p (buffer-modified-p))) ;No-op, but updates mode line.
+  (force-mode-line-update))
 
 ;; This is very useful for cancelling a selection in the minibuffer without 
 ;; aborting the minibuffer.