From d588a9dd3a8689f5233a3806600446484d309cf3 Mon Sep 17 00:00:00 2001 From: Alexander Iljin Date: Thu, 24 Aug 2017 04:14:56 +0300 Subject: [PATCH] windows.dropfiles: add startup hook to reset initialization status --- basis/windows/dropfiles/dropfiles.factor | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) 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 -- 2.34.1