mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2026-09-10 07:46:51 -04:00
Fix progress-reporter-echo-area update-text
* lisp/subr.el (progress-reporter-echo-area): Format UPDATE-TEXT as a string (bug#81514).
This commit is contained in:
parent
bc92224c5f
commit
a027452c71
|
|
@ -7240,7 +7240,7 @@ area is busy with something else."
|
|||
(unless (and (eq (progress-reporter-context reporter) 'async)
|
||||
(current-message)
|
||||
(not (string-prefix-p text (current-message))))
|
||||
(setq update-text (concat (if update-text " " "") update-text))
|
||||
(setq update-text (if update-text (format " %s" update-text) ""))
|
||||
(pcase state
|
||||
((pred floatp)
|
||||
(if (plusp state)
|
||||
|
|
|
|||
Loading…
Reference in a new issue