error message typo
include in 5.2
This commit is contained in:
parent
10d19bf8d5
commit
95e29376fd
|
@ -87,7 +87,7 @@
|
||||||
(unless (and (procedure? f)
|
(unless (and (procedure? f)
|
||||||
(procedure-arity-includes? f 1))
|
(procedure-arity-includes? f 1))
|
||||||
(raise-type-error (who->name '(method container<%> change-children))
|
(raise-type-error (who->name '(method container<%> change-children))
|
||||||
"procedure or arity 1"
|
"procedure of arity 1"
|
||||||
f))
|
f))
|
||||||
(send (get-wx-panel) change-children
|
(send (get-wx-panel) change-children
|
||||||
(lambda (kids)
|
(lambda (kids)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user