We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent c29a0b0 commit db37318Copy full SHA for db37318
1 file changed
htdp-lib/2htdp/private/world.rkt
@@ -258,8 +258,8 @@
258
(style '(no-hscroll no-vscroll))
259
(horizontal-inset INSET)
260
(vertical-inset INSET)))
261
- (send editor-canvas min-client-width (+ width INSET INSET))
262
- (send editor-canvas min-client-height (+ height INSET INSET))
+ (send editor-canvas min-client-width (sub1 (+ width INSET INSET)))
+ (send editor-canvas min-client-height (sub1 (+ height INSET INSET)))
263
(set!-values (enable-images-button disable-images-button)
264
(inner (values void void) create-frame/universe frame play-back:cust))
265
(send editor-canvas focus)
0 commit comments