diff options
| author | Richard M. Stallman | 2002-04-01 12:03:14 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2002-04-01 12:03:14 +0000 |
| commit | a9d956befb7ec91a0ca3ae9db0a23877a1b18c90 (patch) | |
| tree | 81d60d33431f8d6c2b3573c5fa8594fdf6483afa | |
| parent | 63fedde0091c755ed3166b516f0d7dccd3905ada (diff) | |
| download | emacs-a9d956befb7ec91a0ca3ae9db0a23877a1b18c90.tar.gz emacs-a9d956befb7ec91a0ca3ae9db0a23877a1b18c90.zip | |
(redraw-modeline): Define alias.
| -rw-r--r-- | lisp/subr.el | 3 |
1 files changed, 3 insertions, 0 deletions
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." | |||
| 1117 | ;; Revert the undo info to what it was when we grabbed the state. | 1117 | ;; Revert the undo info to what it was when we grabbed the state. |
| 1118 | (setq buffer-undo-list elt))))) | 1118 | (setq buffer-undo-list elt))))) |
| 1119 | 1119 | ||
| 1120 | ;; For compatibility. | ||
| 1121 | (defalias 'redraw-modeline 'force-mode-line-update) | ||
| 1122 | |||
| 1120 | (defun force-mode-line-update (&optional all) | 1123 | (defun force-mode-line-update (&optional all) |
| 1121 | "Force the mode line of the current buffer to be redisplayed. | 1124 | "Force the mode line of the current buffer to be redisplayed. |
| 1122 | With optional non-nil ALL, force redisplay of all mode lines." | 1125 | With optional non-nil ALL, force redisplay of all mode lines." |