windows.dragdrop-listener: replace construct-boa with boa

diff --git a/basis/windows/dragdrop-listener/dragdrop-listener.factor b/basis/windows/dragdrop-listener/dragdrop-listener.factor
index 3ba0bcaf6eaa8e0aff2b1b9d797a9ac83180a1d6..eecc3cc6b9a2f0d8e7aff2c38c06a2ec35ffd426 100644 (file)
--- a/basis/windows/dragdrop-listener/dragdrop-listener.factor
+++ b/basis/windows/dragdrop-listener/dragdrop-listener.factor
@@ -33,7 +33,7 @@ IN: windows.dragdrop-listener
 TUPLE: listener-dragdrop hWnd last-drop-effect ;
 
 : <listener-dragdrop> ( hWnd -- object )
-    DROPEFFECT_NONE listener-dragdrop construct-boa ;
+    DROPEFFECT_NONE listener-dragdrop boa ;
 
 SYMBOL: +listener-dragdrop-wrapper+
 {