diff --git a/collects/mred/private/wx/win32/window.rkt b/collects/mred/private/wx/win32/window.rkt index f345d2e122..cfd101f47f 100644 --- a/collects/mred/private/wx/win32/window.rkt +++ b/collects/mred/private/wx/win32/window.rkt @@ -138,6 +138,9 @@ (init style [extra-hwnds null]) + (define enabled? #t) + (define parent-enabled? #t) + (super-new) (define eventspace (if parent @@ -271,8 +274,6 @@ (define/public (get-handle) hwnd) (define/public (get-client-handle) (get-content-hwnd)) - (define enabled? #t) - (define parent-enabled? #t) (define/public (enable on?) (unless (eq? enabled? (and on? #t)) (atomically