.
original commit: 69915f2bd918a1b44ca733692c8f8e2ef3cb7e3f
This commit is contained in:
parent
b13f87b78f
commit
9a05a819af
|
@ -2009,7 +2009,7 @@
|
|||
(define make-selector-and-runner
|
||||
(lambda (p1 p2 radios? size maker)
|
||||
(define (make-radio-box lbl choices panel cb)
|
||||
(let ([g (instantiate group-box-panel% (lbl panel) [horiz-margin 2] [vert-margin 2])])
|
||||
(let ([g (instantiate group-box-panel% (lbl panel))])
|
||||
(make-object radio-box% #f choices g cb)))
|
||||
(define radio-h-radio
|
||||
(make-radio-box
|
||||
|
|
Loading…
Reference in New Issue
Block a user