diff --git a/collects/framework/private/frame.rkt b/collects/framework/private/frame.rkt index 4fb8cdae21..21b1e5cee8 100644 --- a/collects/framework/private/frame.rkt +++ b/collects/framework/private/frame.rkt @@ -2486,6 +2486,7 @@ (super-new [stretchable-width #f] [style '(transparent)]) + (send (get-dc) set-font small-control-font) (define-values (indicator-width indicator-height) (let-values ([(tw th _1 _2) (send (get-dc) get-text-extent indicator)]) (values tw th)))