From 562abdbc6f9c703002c0c6deb63f5292104c00fd Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Sat, 30 Nov 2013 20:57:56 -0700 Subject: [PATCH] racket/gui win32: reset canvas backing size when scroll bars change Avoids a gray box at the bottom of the GRacket REPL window on startup, or in DrRacket when a horizontal scroll is automatically removed due to, say, hiding a interactions window positioned to the right of the definitions window (where the definitions content is narrower than the whole window but wider than half). Merge to v6.0 (cherry picked from commit 836f4cab20c9ac4e8084a0c9f97e10e82533809f) --- pkgs/gui-pkgs/gui-lib/mred/private/wx/win32/canvas.rkt | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/pkgs/gui-pkgs/gui-lib/mred/private/wx/win32/canvas.rkt b/pkgs/gui-pkgs/gui-lib/mred/private/wx/win32/canvas.rkt index ec089a85fb..6e3b0751d8 100644 --- a/pkgs/gui-pkgs/gui-lib/mred/private/wx/win32/canvas.rkt +++ b/pkgs/gui-pkgs/gui-lib/mred/private/wx/win32/canvas.rkt @@ -394,7 +394,8 @@ (when vscroll? (atomically (set! v-scroll-visible? (and v? #t)) - (ShowScrollBar canvas-hwnd SB_VERT v?)))) + (ShowScrollBar canvas-hwnd SB_VERT v?))) + (reset-dc)) (define/override (do-set-scrollbars h-step v-step h-len v-len