Commit bc91aee9 authored by Štěpán Němec's avatar Štěpán Němec Committed by Glenn Morris
Browse files

Close bug#5670 with patch from Štěpán Němec <stepnem at gmail.com>.

* subr.el (momentary-string-display): Don't overwrite the MESSAGE
argument with a local variable.  (Bug#5670)
parent 1ddd6622
2010-03-03 Štěpán Němec <stepnem@gmail.com>
* subr.el (momentary-string-display): Don't overwrite the MESSAGE
argument with a local variable. (Bug#5670)
2010-03-02 Juri Linkov <juri@jurta.org>
* info.el (Info-index-next): Decrement line number by 2. (Bug#5652)
......
......@@ -2196,15 +2196,15 @@ Display MESSAGE (optional fourth arg) in the echo area.
If MESSAGE is nil, instructions to type EXIT-CHAR are displayed there."
(or exit-char (setq exit-char ?\s))
(let ((ol (make-overlay pos pos))
(message (copy-sequence string)))
(str (copy-sequence string)))
(unwind-protect
(progn
(save-excursion
(overlay-put ol 'after-string message)
(overlay-put ol 'after-string str)
(goto-char pos)
;; To avoid trouble with out-of-bounds position
(setq pos (point))
;; If the message end is off screen, recenter now.
;; If the string end is off screen, recenter now.
(if (<= (window-end nil t) pos)
(recenter (/ (window-height) 2))))
(message (or message "Type %s to continue editing.")
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment