andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/comint.el (comint-dynamic-list-input-ring): Keep replaced text props.

Browse source 
* lisp/minibuffer.el (completions-header-format): Remove unused	text prop.
This commit is contained in:
Juri Linkov 2022-04-13 20:56:34 +03:00
parent 88998aab94
commit 10c675b960
2 changed files with 3 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/comint.el
View file

@ -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)

4
lisp/minibuffer.el
View file

@ -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."