on second thought, maybe this is the right last argument

original commit: 39008f2130b0eee4e41f6bd96dd5cf13d7474064
This commit is contained in:
Robby Findler 2010-12-06 19:33:46 -06:00
parent 00478aba9b
commit 867670281c

View File

@ -155,7 +155,7 @@
(unhide-cursor) (unhide-cursor)
(begin0 (begin0
(default w msg wParam lParam) (default w msg wParam lParam)
(do-key w msg wParam lParam #f #f default))] (do-key w msg wParam lParam #f #f void))]
[(= msg WM_KEYDOWN) [(= msg WM_KEYDOWN)
(do-key w msg wParam lParam #f #f default)] (do-key w msg wParam lParam #f #f default)]
[(= msg WM_KEYUP) [(= msg WM_KEYUP)