# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1017662594 0
# Node ID 30505fab0350c069d2ae76e40a74fbe80abb657e
# Parent  f259c3857feadc4a6c5ce0909757086f9fc710e8
(redraw-modeline): Define alias.

diff -r f259c3857fea -r 30505fab0350 lisp/subr.el
--- a/lisp/subr.el	Mon Apr 01 11:00:33 2002 +0000
+++ b/lisp/subr.el	Mon Apr 01 12:03:14 2002 +0000
@@ -1117,6 +1117,9 @@
 	;; 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."