diff --git a/collects/tests/mred/item.ss b/collects/tests/mred/item.ss
index 29b2b5fd..ae69272f 100644
--- a/collects/tests/mred/item.ss
+++ b/collects/tests/mred/item.ss
@@ -1444,8 +1444,11 @@
 (send bp stretchable-in-x #f)
 (make-object mred:button% bp (lambda (b e) (button-frame mred:frame%)) "Make Button Frame")
 (make-object mred:button% bp (lambda (b e) (button-frame mred:noisy-dialog-box%)) "Make Button Dialog Box")
-(make-object mred:button% ap (lambda (b e) (checkbox-frame)) "Make Checkbox Frame")
-(make-object mred:button% ap (lambda (b e) (radiobox-frame)) "Make Radiobox Frame")
+(define crp (make-object mred:horizontal-panel% ap))
+(send crp stretchable-in-y #f)
+(make-object mred:button% crp (lambda (b e) (checkbox-frame)) "Make Checkbox Frame")
+(make-object mred:vertical-panel% crp) ; filler
+(make-object mred:button% crp (lambda (b e) (radiobox-frame)) "Make Radiobox Frame")
 (define cp (make-object mred:horizontal-panel% ap))
 (send cp stretchable-in-x #f)
 (make-object mred:button% cp (lambda (b e) (choice-or-list-frame #f 0 #f)) "Make Choice Frame")
@@ -1456,8 +1459,11 @@
 (make-object mred:button% lp (lambda (b e) (choice-or-list-frame #t wx:const-single #t)) "Make Empty List Frame")
 (make-object mred:button% lp (lambda (b e) (choice-or-list-frame #t wx:const-multiple #f)) "Make MultiList Frame")
 (make-object mred:button% lp (lambda (b e) (choice-or-list-frame #t wx:const-extended #f)) "Make MultiExtendList Frame")
-(make-object mred:button% ap (lambda (b e) (gauge-frame)) "Make Gauge Frame")
-(make-object mred:button% ap (lambda (b e) (slider-frame)) "Make Slider Frame")
+(define gsp (make-object mred:horizontal-panel% ap))
+(send gsp stretchable-in-y #f)
+(make-object mred:button% gsp (lambda (b e) (gauge-frame)) "Make Gauge Frame")
+(make-object mred:vertical-panel% gsp) ; filler
+(make-object mred:button% gsp (lambda (b e) (slider-frame)) "Make Slider Frame")
 (define tp (make-object mred:horizontal-panel% ap))
 (send tp stretchable-in-x #f)
 (make-object mred:button% tp (lambda (b e) (text-frame mred:text% 0)) "Make Text Frame")