1117 |
;; Revert the undo info to what it was when we grabbed the state. |
;; Revert the undo info to what it was when we grabbed the state. |
1118 |
(setq buffer-undo-list elt))))) |
(setq buffer-undo-list elt))))) |
1119 |
|
|
1120 |
|
;; For compatibility. |
1121 |
|
(defalias 'redraw-modeline 'force-mode-line-update) |
1122 |
|
|
1123 |
(defun force-mode-line-update (&optional all) |
(defun force-mode-line-update (&optional all) |
1124 |
"Force the mode line of the current buffer to be redisplayed. |
"Force the mode line of the current buffer to be redisplayed. |
1125 |
With optional non-nil ALL, force redisplay of all mode lines." |
With optional non-nil ALL, force redisplay of all mode lines." |