From edd990d7411cbd1c1ab19c16b4ed4112ad5e1d41 Mon Sep 17 00:00:00 2001 From: Daniel Mendler Date: Sat, 20 Dec 2025 13:12:24 +0100 Subject: Revert "Remove corfu-popupinfo face" This reverts commit 21edb09ddcfda7f90ad357346137ce0e669017a3. --- extensions/corfu-popupinfo.el | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/extensions/corfu-popupinfo.el b/extensions/corfu-popupinfo.el index 44d199e..5adb182 100644 --- a/extensions/corfu-popupinfo.el +++ b/extensions/corfu-popupinfo.el @@ -45,6 +45,11 @@ (require 'cl-lib) (require 'subr-x)) +(defface corfu-popupinfo + '((t :inherit corfu-default)) + "Face used for the info popup." + :group 'corfu-faces) + (defcustom corfu-popupinfo-delay '(2.0 . 1.0) "Automatically update info popup after that number of seconds. @@ -358,7 +363,9 @@ form (X Y WIDTH HEIGHT DIR)." (insert content) (goto-char (point-min))) (dolist (var corfu-popupinfo--buffer-parameters) - (set (make-local-variable (car var)) (cdr var)))) + (set (make-local-variable (car var)) (cdr var))) + (when-let ((m (memq 'corfu-default (alist-get 'default face-remapping-alist)))) + (setcar m 'corfu-popupinfo))) (corfu-popupinfo--hide) (setq cand-changed nil coords-changed nil))) (when (or cand-changed coords-changed) -- cgit v1.0