From 7ae58ebcc886a8503a96cda155af9084f41dfc61 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Mon, 7 Feb 2005 23:02:36 +0000
Subject: [PATCH] .

original commit: a8016265a2a3f8fc1134c22b6e73f9005a26c8e5
---
 collects/mred/private/kernel.ss | 3 +++
 1 file changed, 3 insertions(+)

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