suzanne.soy/gui
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

..

Browse Source 
original commit: ca0c47336a8ce7915d330902de39b9e016c90eec
This commit is contained in:
Robby Findler 2003-08-14 03:37:39 +00:00
parent a53d477f69
commit 113aab5fc4
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
collects/framework/private/panel.ss
View File

@ -190,7 +190,7 @@
(define-struct percentage (%)) (define-struct percentage (%))
(define dragable<%> (define dragable<%>
(interface () (interface (window<%> area-container<%>)
after-percentage-change after-percentage-change
set-percentages set-percentages
get-percentages get-percentages
@ -203,7 +203,7 @@
(interface (dragable<%>))) (interface (dragable<%>)))
(define dragable-mixin (define dragable-mixin
(mixin ((class->interface panel%)) (dragable<%>) (mixin (window<%> area-container<%>) (dragable<%>)
(init parent) (init parent)
(define/public (get-vertical?) (define/public (get-vertical?)