From d558d9fa1e0daf7e8f511cac4595c1eeeeeeb177 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Jo=C3=A3o=20T=C3=A1vora?= Date: Thu, 7 Nov 2019 23:54:21 +0000 Subject: Have pcm styles apply faces to face prop, not font-lock-face This is the way the basic completion styles work. This fixes candidate highlighting in icomplete. * lisp/minibuffer.el (completion-pcm--hilit-commonality): Apply faces to 'face property, not font-lock-face. --- lisp/minibuffer.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el index 43dd277a2e4..cc113b926f3 100644 --- a/lisp/minibuffer.el +++ b/lisp/minibuffer.el @@ -3145,16 +3145,16 @@ one-letter-long matches).") (while md (funcall update-score start (car md)) (put-text-property start (pop md) - 'font-lock-face 'completions-common-part + 'face 'completions-common-part str) (setq start (pop md))) (funcall update-score len len) (put-text-property start end - 'font-lock-face 'completions-common-part + 'face 'completions-common-part str) (if (> (length str) pos) (put-text-property pos (1+ pos) - 'font-lock-face 'completions-first-difference + 'face 'completions-first-difference str)) (unless (zerop (length str)) (put-text-property -- cgit v1.2.1