Upgraded corfu

This commit is contained in:
Benson Chu 2025-05-23 14:37:16 -05:00
parent 8cac2ded8c
commit 88f3afa504
3 changed files with 6 additions and 3 deletions

View file

@ -485,6 +485,9 @@
(add-hook 'prog-mode-hook
'corfu-mode)
:config
(unless window-system
(use-package corfu-terminal)
(corfu-terminal-mode 1))
(when my-ec/enable-exwm
(require 'corfu-hack)))

2
elpa

@ -1 +1 @@
Subproject commit 10274013767e32490f797ffc87620f1abaef0564
Subproject commit 513ae0ba03f7aabf13d8874b47c7322be5bad58a

View file

@ -57,7 +57,7 @@
;; (get-focused-monitor-geometry)
(defun advise-corfu-make-frame-with-monitor-awareness (orig-fun frame x y width height buffer)
(defun advise-corfu-make-frame-with-monitor-awareness (orig-fun frame x y width height)
"Advise `corfu--make-frame` to be monitor-aware, adjusting X and Y according to the focused monitor."
;; Get the geometry of the currently focused monitor
(let* ((monitor-geometry (get-focused-monitor-geometry))
@ -72,7 +72,7 @@
(new-y (+ monitor-y y)))
;; Call the original function with potentially adjusted coordinates
(funcall orig-fun frame new-x new-y width height buffer)))
(funcall orig-fun frame new-x new-y width height)))
(advice-add 'corfu--make-frame :around #'advise-corfu-make-frame-with-monitor-awareness)