...
original commit: c20b8142c31c7ab953555d72ba293ccbeb39cb96
This commit is contained in:
parent
067faf11ec
commit
69035da91b
|
@ -2069,7 +2069,7 @@
|
|||
[(and (mrf-bday?)
|
||||
(send evt button-up?))
|
||||
(message-box (string-constant drscheme)
|
||||
"Happy Birthday, Matthew!")]
|
||||
(string-constant happy-birthday-matthew))]
|
||||
[else (super-on-event evt)]))
|
||||
(super-instantiate ())))
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user