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

fix `tab-panel%' callback problem

Browse Source 
Closes PR 11528
This commit is contained in:
Matthew Flatt 2011-01-08 07:55:42 -07:00
parent 8d15718188
commit f2a11c504d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/mred/private/mrpanel.rkt
View File

@ -138,7 +138,7 @@
(cdr style) (cdr style)
(list (car style))) (list (car style)))
(cons 'border style))) (cons 'border style)))
(send (mred->wx this) set-callback callback)) (send (mred->wx this) set-callback (lambda (wx e) (callback (wx->mred wx) e))))
(public (public
[get-number (lambda () (length save-choices))] [get-number (lambda () (length save-choices))]