original commit: 85ef50be6b6e57aef769c385f77fde888776a336
This commit is contained in:
Matthew Flatt 2000-06-27 13:52:45 +00:00
parent f055d3d3ad
commit 7ab74b1b47

View File

@ -171,6 +171,7 @@
(let* ([mb (remember tag (make-object menu-bar% ef))]
[m (remember tag (make-object menu% "Ok" mb))])
(remember tag (make-object menu-item% "Hi" m void))
(remember tag (make-object menu-item% "There" m void #\t))
(remember tag
(make-object checkable-menu-item%
"Checkable"