error message typo

include in 5.2
This commit is contained in:
Robby Findler 2011-10-11 10:43:37 -05:00
parent 10d19bf8d5
commit 95e29376fd

View File

@ -87,7 +87,7 @@
(unless (and (procedure? f)
(procedure-arity-includes? f 1))
(raise-type-error (who->name '(method container<%> change-children))
"procedure or arity 1"
"procedure of arity 1"
f))
(send (get-wx-panel) change-children
(lambda (kids)