Fix broken message name

This commit is contained in:
eknauel 2005-05-31 07:58:28 +00:00
parent c889c878ef
commit f964abb252
1 changed files with 1 additions and 1 deletions

View File

@ -937,7 +937,7 @@
((make-simple-result-buffer-printer y x text '() '())
win buffer have-focus?)))
((eq? message 'key)
((eq? message 'key-press)
(lambda (self . ignore)
self))))))