Commit 51b3f591 authored by Syohei YOSHIDA's avatar Syohei YOSHIDA

Fix for Emacs 24.5 issue

On Emacs 24.5 or higher, string in 'after-string' of overlay which sets 'display'
property at same time does not display in some cases.

(However I don't understand well this issue.)
parent 26876127
......@@ -378,16 +378,15 @@ usual."
(put-text-property start (length content) 'face face content))
(when mouse-face
(put-text-property 0 (length content) 'mouse-face mouse-face content))
(unless (overlay-get overlay 'dangle)
(overlay-put overlay 'display (concat prefix (substring content 0 1)))
(setq prefix nil
content (concat (substring content 1))))
(overlay-put overlay
'after-string
(concat prefix
content
scroll-bar-char
postfix))))
(let ((prop (if (overlay-get overlay 'dangle)
'after-string
'display)))
(overlay-put overlay
prop
(concat prefix
content
scroll-bar-char
postfix)))))
(cl-defun popup-create-line-string (popup
string
......
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