original commit: 509037fbda48f2914eb9a66be6d8965baf3d7053
This commit is contained in:
Matthew Flatt 1999-02-28 22:21:47 +00:00
parent f7745379a2
commit f00786daf2

View File

@ -1519,7 +1519,7 @@
(define containers null)
(define (make-container p)
(let ([p (make-object vertical-panel% p '(border))])
(let ([p (make-object vertical-panel% p '())])
(send p stretchable-width #f)
(send p stretchable-height #f)
(set! containers (cons p containers))