# HG changeset patch
# User Andrew Innes <andrewi@gnu.org>
# Date 918236944 0
# Node ID c5f1a1deffbbc13841cb58d9eeac878fee0355fb
# Parent  ffc2b7069315aa9b987d47b0dad5468401f80ca6
(construct_drag_n_drop): Call DraqQueryPoint before
recording drop position.

diff -r ffc2b7069315 -r c5f1a1deffbb src/w32term.c
--- a/src/w32term.c	Fri Feb 05 15:19:54 1999 +0000
+++ b/src/w32term.c	Fri Feb 05 17:49:04 1999 +0000
@@ -1972,14 +1972,15 @@
   result->timestamp = msg->msg.time;
   result->modifiers = msg->dwModifiers;
 
+  hdrop = (HDROP) msg->msg.wParam;
+  DragQueryPoint (hdrop, &p);
+
   p.x = LOWORD (msg->msg.lParam);
   p.y = HIWORD (msg->msg.lParam);
   ScreenToClient (msg->msg.hwnd, &p);
   XSETINT (result->x, p.x);
   XSETINT (result->y, p.y);
 
-  hdrop = (HDROP) msg->msg.wParam;
-  DragQueryPoint (hdrop, &p);
   num_files = DragQueryFile (hdrop, 0xFFFFFFFF, NULL, 0);
   files = Qnil;