original commit: 95fe929550adcb10c9f9a49e5b3f17ddf12c828f
This commit is contained in:
Matthew Flatt 2002-09-04 19:31:52 +00:00
parent e3aaa0f699
commit b01473094d

View File

@ -5092,7 +5092,8 @@
[msg-pnl (make-object vertical-pane% rhs-pnl)]
[btn-pnl (make-object vertical-pane% rhs-pnl)])
(send msg-pnl vert-margin 16)
(send btn-pnl horiz-margin 16)
(when single?
(send msg-pnl horiz-margin 8))
(send btn-pnl vert-margin 8)
(send msg-pnl min-height 64)
(send btn-pnl stretchable-height #f)