original commit: a6f0357a75ff5144b09640144f005c35c249d8dd
This commit is contained in:
Matthew Flatt 2003-05-02 20:14:03 +00:00
parent 187faed0a1
commit 856a353e4c

View File

@ -1362,7 +1362,7 @@
(dynamic-wind
void
(lambda () (send af on-exit))
(lambda () (set! running-quit? #t)))))))))))])
(lambda () (set! running-quit? #f)))))))))))])
(wx:application-quit-handler (make-app-handler f f)))
(define (set-handler! who proc param)