From: Alexander Iljin <ajsoft@yandex.ru>
Date: Thu, 24 Aug 2017 01:14:56 +0000 (+0300)
Subject: windows.dropfiles: add startup hook to reset initialization status
X-Git-Tag: 0.98~417
X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=commitdiff_plain;h=d588a9dd3a8689f5233a3806600446484d309cf3

windows.dropfiles: add startup hook to reset initialization status
---

diff --git a/basis/windows/dropfiles/dropfiles.factor b/basis/windows/dropfiles/dropfiles.factor
index 8460856503..4587e2e0de 100644
--- a/basis/windows/dropfiles/dropfiles.factor
+++ b/basis/windows/dropfiles/dropfiles.factor
@@ -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