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

windows.dropfiles: add startup hook to reset initialization status

factor-shell
Alexander Iljin 2017-08-24 04:14:56 +03:00 committed by John Benediktsson
parent b9eb4d546f
commit d588a9dd3a
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
basis/windows/dropfiles/dropfiles.factor
View File

@ -1,7 +1,7 @@
! Copyright (C) 2017-2018 Alexander Ilin. ! Copyright (C) 2017-2018 Alexander Ilin.
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: accessors alien alien.data alien.libraries alien.strings USING: accessors alien alien.data alien.libraries alien.strings
continuations fry io.encodings.utf16n kernel literals math continuations fry init io.encodings.utf16n kernel literals math
namespaces sequences ui.backend.windows ui.gadgets.worlds namespaces sequences ui.backend.windows ui.gadgets.worlds
ui.gestures windows.messages windows.shell32 windows.types ui.gestures windows.messages windows.shell32 windows.types
windows.user32 ; windows.user32 ;
@ -61,3 +61,7 @@ IN: windows.dropfiles
: reject-files ( -- ) : reject-files ( -- )
world get world-reject-files ; world get world-reject-files ;
[
f \ init-message-filter set-global
] "init-dropfiles" add-startup-hook