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

minor clean-up

Browse Source 
original commit: 4d8497b985c88fae21dab44c1f32e2afa1808fe4
This commit is contained in:
Matthew Flatt 2010-10-15 12:07:17 -06:00
parent c2bc4a5451
commit 420ba997da
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
collects/mred/private/wx/gtk/procs.rkt
View File

@ -36,7 +36,6 @@
file-creator-and-type file-creator-and-type
run-printout run-printout
get-double-click-time get-double-click-time
key-symbol-to-integer
get-control-font-size get-control-font-size
get-control-font-size-in-pixels? get-control-font-size-in-pixels?
cancel-quit cancel-quit
@ -60,15 +59,15 @@
make-gl-bitmap make-gl-bitmap
check-for-break) check-for-break)
(define-unimplemented play-sound)
(define-unimplemented find-graphical-system-path) (define-unimplemented find-graphical-system-path)
(define-unimplemented location->window) (define-unimplemented location->window)
(define-unimplemented send-event) (define-unimplemented send-event)
(define-unimplemented key-symbol-to-integer)
(define-unimplemented cancel-quit) (define-unimplemented cancel-quit)
(define-unimplemented write-resource) (define-unimplemented write-resource)
(define-unimplemented get-resource) (define-unimplemented get-resource)
(define-unimplemented play-sound)
(define (color-from-user-platform-mode) 'dialog) (define (color-from-user-platform-mode) 'dialog)
(define (font-from-user-platform-mode) #f) (define (font-from-user-platform-mode) #f)