racket/gui: fix `get-key-release-code' result for a key-press event

Return 'press (matching docs and pre-v5.1) insteda of 'down.

original commit: 082f21c5f80d22baa1d93680d89ae70265ba7ed0
This commit is contained in:
Matthew Flatt 2013-08-10 09:07:56 -06:00
parent 81cbed6b17
commit 8d0fc23d54
2 changed files with 8 additions and 1 deletions

View File

@ -1,3 +1,10 @@
Version 5.90.0.5
Fix key-event% get-key-release-code to return 'press instead of 'down
for a key-down event
----------------------------------------
Version 5.1, February 2011
The GRacket executable is now a thin wrapper on the Racket executable,

View File

@ -82,7 +82,7 @@
[[exact-integer? y] 0])
(init [time-stamp 0])
(init-properties [[bool? caps-down] #f])
(properties [[(make-alts symbol? char?) key-release-code] 'down]
(properties [[(make-alts symbol? char?) key-release-code] 'press]
[[(make-or-false (make-alts symbol? char?)) other-shift-key-code] #f]
[[(make-or-false (make-alts symbol? char?)) other-altgr-key-code] #f]
[[(make-or-false (make-alts symbol? char?)) other-shift-altgr-key-code] #f]