From 113aab5fc4e990b2165a56627364ca646b2334ab Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Thu, 14 Aug 2003 03:37:39 +0000 Subject: [PATCH] .. original commit: ca0c47336a8ce7915d330902de39b9e016c90eec --- collects/framework/private/panel.ss | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/collects/framework/private/panel.ss b/collects/framework/private/panel.ss index 077d3902..aa86f194 100644 --- a/collects/framework/private/panel.ss +++ b/collects/framework/private/panel.ss @@ -190,7 +190,7 @@ (define-struct percentage (%)) (define dragable<%> - (interface () + (interface (window<%> area-container<%>) after-percentage-change set-percentages get-percentages @@ -203,7 +203,7 @@ (interface (dragable<%>))) (define dragable-mixin - (mixin ((class->interface panel%)) (dragable<%>) + (mixin (window<%> area-container<%>) (dragable<%>) (init parent) (define/public (get-vertical?)