steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

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

modern-harvey2
Alexander Iljin 2017-08-12 16:36:06 +03:00
parent d6c7a7437f
commit 111d73a901
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/windows/dragdrop-listener/dragdrop-listener.factor
View File

@ -33,7 +33,7 @@ IN: windows.dragdrop-listener
TUPLE: listener-dragdrop hWnd last-drop-effect ; TUPLE: listener-dragdrop hWnd last-drop-effect ;
: <listener-dragdrop> ( hWnd -- object ) : <listener-dragdrop> ( hWnd -- object )
DROPEFFECT_NONE listener-dragdrop construct-boa ; DROPEFFECT_NONE listener-dragdrop boa ;
SYMBOL: +listener-dragdrop-wrapper+ SYMBOL: +listener-dragdrop-wrapper+
{ {