error message typo

include in 5.2 original commit: 95e29376fd04c54c9e4a4647fc6e95b73d5c0b21
2011-10-11 10:43:37 -05:00 · 2011-10-11 10:43:37 -05:00 · 209953a20d
commit 209953a20d
parent a8d2828fd8
1 changed files with 1 additions and 1 deletions
--- a/collects/mred/private/mrcontainer.rkt
+++ b/collects/mred/private/mrcontainer.rkt
@ -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)