summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Mendler <mail@daniel-mendler.de>2025-12-20 13:12:24 +0100
committerDaniel Mendler <mail@daniel-mendler.de>2025-12-20 13:12:31 +0100
commitedd990d7411cbd1c1ab19c16b4ed4112ad5e1d41 (patch)
tree7d95794757779bb5a3568bd02d3a886b117cf311
parent82955c2fe1c315cd18aef577ed0bed6dc2dac6f5 (diff)
Revert "Remove corfu-popupinfo face"
This reverts commit 21edb09ddcfda7f90ad357346137ce0e669017a3.
-rw-r--r--extensions/corfu-popupinfo.el9
1 files changed, 8 insertions, 1 deletions
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)