original commit: db6c11502f6f5720b7fa3f241a7e51e59a336561
This commit is contained in:
Matthew Flatt 1999-01-25 14:28:24 +00:00
parent aac0946eb3
commit a2718fa0d4
2 changed files with 5 additions and 1 deletions

View File

@ -248,7 +248,11 @@
(values l il))))
(define b (make-object button% "He&llo" ip void))
(define b (make-object button% "He&llo" ip
(lambda (b e)
(send b enable #f)
(sleep/yield 5)
(send b enable #t))))
(define ib (make-object button% bb-bmp ip void))