mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-21 18:23:59 +00:00
* lisp/comint.el (comint-dynamic-list-input-ring): Keep replaced text props.
* lisp/minibuffer.el (completions-header-format): Remove unused text prop.
This commit is contained in:
parent
88998aab94
commit
10c675b960
@ -1110,7 +1110,8 @@ See also `comint-read-input-ring'."
|
||||
(use-local-map keymap))
|
||||
(forward-line 3)
|
||||
(while (search-backward "completion" nil 'move)
|
||||
(replace-match "history reference")))
|
||||
(replace-match (apply #'propertize "history reference"
|
||||
(text-properties-at (point))))))
|
||||
(sit-for 0)
|
||||
(message "Hit space to flush")
|
||||
(setq comint-dynamic-list-input-ring-window-conf conf)
|
||||
|
@ -1895,9 +1895,7 @@ completions."
|
||||
:version "28.1")
|
||||
|
||||
(defcustom completions-header-format
|
||||
(propertize "%s possible completions:\n"
|
||||
'face 'shadow
|
||||
:help "Please select a completion")
|
||||
(propertize "%s possible completions:\n" 'face 'shadow)
|
||||
"Format of completions header.
|
||||
It may contain one %s to show the total count of completions.
|
||||
When nil, no header is shown."
|
||||
|
Loading…
Reference in New Issue
Block a user