Fix init order of choice%'s type
This commit is contained in:
parent
9de70551dc
commit
6ad017a1e9
|
@ -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]
|
||||
|
|
Loading…
Reference in New Issue
Block a user