diff --git a/basis/ui/gadgets/sliders/sliders.factor b/basis/ui/gadgets/sliders/sliders.factor index fa1bb7258e..12c1de1f4b 100644 --- a/basis/ui/gadgets/sliders/sliders.factor +++ b/basis/ui/gadgets/sliders/sliders.factor @@ -224,7 +224,7 @@ M: slider-pen pen-pref-dim enabled>> pen-pref-dim ; M: slider pref-dim* - [ slider-enabled? [ { 14 14 } ] [ { 0 0 } ] if ] + [ dup slider-enabled? [ dup interior>> pen-pref-dim ] [ drop { 0 0 } ] if ] [ drop { 100 100 } ] [ orientation>> ] tri set-axis ;