mirror of
https://github.com/pestctrl/emacs-config.git
synced 2026-06-14 04:11:18 +00:00
I believe corfu has been updated everywhere
This commit is contained in:
parent
ddda0a1668
commit
fa286eb8f4
1 changed files with 2 additions and 2 deletions
|
|
@ -57,7 +57,7 @@
|
||||||
|
|
||||||
;; (get-focused-monitor-geometry)
|
;; (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."
|
"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
|
;; Get the geometry of the currently focused monitor
|
||||||
(let* ((monitor-geometry (get-focused-monitor-geometry))
|
(let* ((monitor-geometry (get-focused-monitor-geometry))
|
||||||
|
|
@ -72,7 +72,7 @@
|
||||||
(new-y (+ monitor-y y)))
|
(new-y (+ monitor-y y)))
|
||||||
|
|
||||||
;; Call the original function with potentially adjusted coordinates
|
;; 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)
|
(advice-add 'corfu--make-frame :around #'advise-corfu-make-frame-with-monitor-awareness)
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue