[racket-dev] list-box% not properly sized

Hi list,

list-box%es are not properly sized; the following code:



#lang racket/gui

(define root (new frame% (label "choice widgets")))

(define list-box (new list-box% (parent root) (label "List-box: ")
(style '(multiple)) (choices '("1" "b" "C3" "44" "five" "6" "seven" "OO"))))

(send root show #t)



results in the attached screenshot.

Marijn

-------------- next part --------------
A non-text attachment was scrubbed...
Name: bug-in-list-box-display.png
Type: image/png
Size: 3671 bytes
Desc: not available
URL: <http://lists.racket-lang.org/dev/archive/attachments/20110901/4cfa289e/attachment.png>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: signature.asc
Type: application/pgp-signature
Size: 262 bytes
Desc: OpenPGP digital signature
URL: <http://lists.racket-lang.org/dev/archive/attachments/20110901/4cfa289e/attachment.sig>