suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

alow using tab to get to the buttons

Browse Source 
svn: r3803
This commit is contained in:
Eli Barzilay 2006-07-25 06:59:47 +00:00
parent d5294823a2
commit 7b8e8add19
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
collects/setup/plt-installer-unit.ss
View File

@ -74,6 +74,7 @@
(custodian-shutdown-all installer-cust))] (custodian-shutdown-all installer-cust))]
[installer-cust (make-custodian)]) [installer-cust (make-custodian)])
(send done enable #f) (send done enable #f)
(send canvas allow-tab-exit #t)
((current-text-keymap-initializer) (send text get-keymap)) ((current-text-keymap-initializer) (send text get-keymap))
(send text lock #t) (send text lock #t)