Fix init order of choice%'s type

This commit is contained in:
Asumu Takikawa 2014-10-24 15:33:34 -04:00
parent 9de70551dc
commit 6ad017a1e9

View File

@ -959,8 +959,8 @@
(define-type Choice%
(Class #:implements List-Control<%>
(init [label String]
[parent (Instance Area-Container<%>)] ; FIXME
[choices (Listof String)]
[parent (Instance Area-Container<%>)] ; FIXME
[callback ((Instance Choice%)
(Instance Control-Event%) -> Any)
#:optional]