From 43c823330832f201906a75a9c38b0873cc030a7a Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Sun, 27 Apr 2014 20:51:35 -0600 Subject: [PATCH] racket/gui Win32: fix use-before-definition problem for `choice%` Closes PR 14475 original commit: 9cb652dd0e211c531d9d3febda7a45a8e2d29bfb --- pkgs/gui-pkgs/gui-lib/mred/private/wx/win32/choice.rkt | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/pkgs/gui-pkgs/gui-lib/mred/private/wx/win32/choice.rkt b/pkgs/gui-pkgs/gui-lib/mred/private/wx/win32/choice.rkt index 565f8477..f3373a5b 100644 --- a/pkgs/gui-pkgs/gui-lib/mred/private/wx/win32/choice.rkt +++ b/pkgs/gui-pkgs/gui-lib/mred/private/wx/win32/choice.rkt @@ -46,6 +46,8 @@ (SendMessageW hwnd CB_SETCURSEL 0 0) + (define choice-dropped? #f) + (super-new [callback cb] [parent parent] [hwnd hwnd] @@ -61,8 +63,6 @@ (set-size #f #f w (* h 8)))) - (define choice-dropped? #f) - (define/override (ctlproc w msg wParam lParam default) (cond [(and choice-dropped?