diff --git a/collects/macro-debugger/syntax-browser/widget.ss b/collects/macro-debugger/syntax-browser/widget.ss index 7c3a365..2cd8978 100644 --- a/collects/macro-debugger/syntax-browser/widget.ss +++ b/collects/macro-debugger/syntax-browser/widget.ss @@ -46,17 +46,6 @@ (editor -text) (context-menu (make-context-menu))) - ;; FIXME: Why doesn't this work? - #; - (when (current-syntax-font-size) - (let* ([style-list (send -text get-style-list)] - [standard (send style-list find-named-style "Standard")]) - (send style-list replace-named-style "Standard" - (send style-list find-or-create-style - standard - (make-object style-delta% 'change-size - (current-syntax-font-size)))))) - (send -text lock #t) (send -split-panel set-percentages (list (- 1 props-percentage) props-percentage))