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

clean up

Browse Source 
original commit: 80e5c6cec3acb0f3fa1e26cf7418283124a1c03a
This commit is contained in:
Matthew Flatt 2010-12-28 20:15:30 -07:00
parent d5d96c29ff
commit bb8f88f28d
2 changed files with 0 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/mred/private/wx/cocoa/button.rkt
View File

@ -124,8 +124,6 @@
(values cocoa image-cocoa))) (values cocoa image-cocoa)))
(values button-cocoa #f))) (values button-cocoa #f)))
(define we (make-will-executor))
(super-new [parent parent] (super-new [parent parent]
[cocoa cocoa] [cocoa cocoa]
[no-show? (memq 'deleted style)] [no-show? (memq 'deleted style)]

1
collects/mred/private/wx/gtk/list-box.rkt
View File

@ -138,7 +138,6 @@
(define callback cb) (define callback cb)
(define ignore-click? #f) (define ignore-click? #f)
(define/public (queue-changed) (define/public (queue-changed)
(make-will-executor)
;; Called from event-handling thread ;; Called from event-handling thread
(unless ignore-click? (unless ignore-click?
(queue-window-event (queue-window-event