From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 1 Apr 2002 12:03:14 +0000 (+0000)
Subject: (redraw-modeline): Define alias.
X-Git-Tag: ttn-vms-21-2-B4~15874
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a9d956befb7ec91a0ca3ae9db0a23877a1b18c90;p=emacs.git

(redraw-modeline): Define alias.
---

diff --git a/lisp/subr.el b/lisp/subr.el
index 51297611edb..fb03b7ad1ba 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -1117,6 +1117,9 @@ This finishes the change group by reverting all of its changes."
 	;; Revert the undo info to what it was when we grabbed the state.
 	(setq buffer-undo-list elt)))))
 
+;; For compatibility.
+(defalias 'redraw-modeline 'force-mode-line-update)
+
 (defun force-mode-line-update (&optional all)
   "Force the mode line of the current buffer to be redisplayed.
 With optional non-nil ALL, force redisplay of all mode lines."