From f3ef0c0f36160ba39962adef24114b316b48fb46 Mon Sep 17 00:00:00 2001 From: Daniel Mendler Date: Sat, 8 Nov 2025 12:04:38 +0100 Subject: Use set-frame-position-and-size --- corfu.el | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/corfu.el b/corfu.el index 676cfd7..3718ba7 100644 --- a/corfu.el +++ b/corfu.el @@ -522,10 +522,14 @@ FRAME is the existing frame." ;; Mark window as dedicated to prevent frame reuse (gh:minad/corfu#60) (set-window-dedicated-p win t)) (redirect-frame-focus frame parent) - (set-frame-size frame width height t) (pcase-let ((`(,px . ,py) (frame-position frame))) - (unless (and (= x px) (= y py)) - (set-frame-position frame x y)))) + (cond + ((and (= x px) (= y py)) (set-frame-size frame width height t)) + ;; NOTE: Experimental new addition by Martin Rudalics + ((fboundp 'set-frame-position-and-size) + (set-frame-position-and-size frame x y width height t)) + (t (set-frame-size frame width height t) + (set-frame-position frame x y))))) (make-frame-visible frame) ;; Unparent child frame if EXWM is used, otherwise EXWM buffers are drawn on ;; top of the Corfu child frame. -- cgit v1.0