From f818aa56bf45ec1448aecd3fea4739a1eb96f5c1 Mon Sep 17 00:00:00 2001
From: Robby Findler <robby@racket-lang.org>
Date: Mon, 6 Dec 2010 19:29:53 -0600
Subject: [PATCH] patch so that the alt key does not crash drracket (windows)

---
 collects/mred/private/wx/win32/window.rkt | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/mred/private/wx/win32/window.rkt b/collects/mred/private/wx/win32/window.rkt
index 3ca1072ca2..99e148e0f5 100644
--- a/collects/mred/private/wx/win32/window.rkt
+++ b/collects/mred/private/wx/win32/window.rkt
@@ -155,7 +155,7 @@
           (unhide-cursor)
           (begin0
            (default w msg wParam lParam)
-           (do-key w msg wParam lParam #f #f))]
+           (do-key w msg wParam lParam #f #f default))]
          [(= msg WM_KEYDOWN)
           (do-key w msg wParam lParam #f #f default)]
          [(= msg WM_KEYUP)