From f81065a91be5a54b78e202df6918aff443588ae1 Mon Sep 17 00:00:00 2001 From: Po Lu Date: Mon, 30 May 2022 16:03:11 +0800 Subject: [PATCH] Fix `dnd-indicate-insertion-point' on Mac OS * lisp/term/ns-win.el (ns-handle-drag-motion): Remove debugging code. * src/nsterm.m ([EmacsView draggingUpdated:]): Redisplay here instead. --- lisp/term/ns-win.el | 3 +-- src/nsterm.m | 2 ++ 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/term/ns-win.el b/lisp/term/ns-win.el index c2ce9fef1d4..d90146284f8 100644 --- a/lisp/term/ns-win.el +++ b/lisp/term/ns-win.el @@ -916,8 +916,7 @@ See the documentation of `create-fontset-from-fontset-spec' for the format.") "Handle mouse movement on FRAME at X and Y during drag-and-drop. This moves point to the current mouse position if `dnd-indicate-insertion-point' is enabled." - (dnd-handle-movement (posn-at-x-y x y frame)) - (print (redisplay t) 'external-debugging-output)) + (dnd-handle-movement (posn-at-x-y x y frame))) (provide 'ns-win) (provide 'term/ns-win) diff --git a/src/nsterm.m b/src/nsterm.m index b5d5ab334da..3d2b4116cab 100644 --- a/src/nsterm.m +++ b/src/nsterm.m @@ -8647,6 +8647,8 @@ ns_create_font_panel_buttons (id target, SEL select, SEL cancel_action) safe_call (4, Vns_drag_motion_function, frame, make_fixnum (x), make_fixnum (y)); + + redisplay (); #endif return NSDragOperationGeneric; -- 2.39.2