diff --git a/collects/mred/private/kernel.ss b/collects/mred/private/kernel.ss index 5aa67068..3ef5ba12 100644 --- a/collects/mred/private/kernel.ss +++ b/collects/mred/private/kernel.ss @@ -309,6 +309,7 @@ get-height get-depth) (define-class button% item% #f + set-border set-label on-drop-file pre-on-event @@ -367,6 +368,8 @@ on-event on-paint) (define-private-class dc% dc<%> object% #f + draw-tab + draw-tab-base glyph-exists? end-page end-doc