From: Gerd Moellmann <gerd@gnu.org>
Date: Wed, 10 Jan 2001 15:10:01 +0000 (+0000)
Subject: (set-variable): Force a thorough redisplay for the
X-Git-Tag: emacs-pretest-21.0.96~375
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a2aef0802847f4c0b0b4c339a44c225afc096c95;p=emacs.git

(set-variable): Force a thorough redisplay for the
case that the variable has an effect on the display, like
`tab-width' has.
---

diff --git a/lisp/simple.el b/lisp/simple.el
index 6aae21a3f0c..f9839826ff6 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -3491,7 +3491,11 @@ in the definition is used to check that VALUE is valid."
       (unless (widget-apply type :match val)
 	(error "Value `%S' does not match type %S of %S"
 	       val (car type) var))))
-  (set var val))
+  (set var val)
+
+  ;; Force a thorough redisplay for the case that the variable
+  ;; has an effect on the display, like `tab-width' has.
+  (force-mode-line-update))
 
 ;; Define the major mode for lists of completions.