racket/gui win32: fix for backing-scale

Closes PR 14278 original commit: 2d2cd2744cd9a2f7c6e5e238ffbe36203c7a04fb
2014-01-08 23:06:47 -06:00 · 2014-01-08 23:06:47 -06:00 · f787d05db3
commit f787d05db3
parent 317c02acb5
1 changed files with 1 additions and 1 deletions
--- a/pkgs/gui-pkgs/gui-lib/mred/private/wx/win32/dc.rkt
+++ b/pkgs/gui-pkgs/gui-lib/mred/private/wx/win32/dc.rkt
@ -36,7 +36,7 @@
    (init w h hwnd [gl-config #f])
    (inherit get-cairo-surface)
    (parameterize ([hwnd-param hwnd])
-      (super-new [w w] [h h]))
+      (super-new [w w] [h h] [backing-scale 1.0]))
    
    (define/override (build-cairo-surface w h) 
      (define hwnd (hwnd-param))