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

View File

@ -1,7 +1,7 @@
! Copyright (C) 2017-2018 Alexander Ilin.
! See http://factorcode.org/license.txt for BSD license.
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
ui.gestures windows.messages windows.shell32 windows.types
windows.user32 ;
@ -61,3 +61,7 @@ IN: windows.dropfiles
: reject-files ( -- )
world get world-reject-files ;
[
f \ init-message-filter set-global
] "init-dropfiles" add-startup-hook