adjusted the universe window so that the canvas is shown in the middle of the window when the window resizes
This commit is contained in:
parent
4ac05ce5bd
commit
893beb582e
|
@ -168,8 +168,7 @@
|
|||
(callback-stop! 'frame-stop)
|
||||
(custodian-shutdown-all play-back:cust)))
|
||||
(label (if name (format "~a" name) "World"))
|
||||
(stretchable-width #f)
|
||||
(stretchable-height #f)
|
||||
(alignment '(center center))
|
||||
(style '(no-resize-border metal))))
|
||||
(define editor-canvas
|
||||
(new (class editor-canvas%
|
||||
|
@ -191,6 +190,8 @@
|
|||
[else (void)]))))
|
||||
(parent frame)
|
||||
(editor visible)
|
||||
(stretchable-width #f)
|
||||
(stretchable-height #f)
|
||||
(style '(no-hscroll no-vscroll))
|
||||
(horizontal-inset INSET)
|
||||
(vertical-inset INSET)))
|
||||
|
|
Loading…
Reference in New Issue
Block a user