racket/gui win32: fix for backing-scale
Closes PR 14278
This commit is contained in:
parent
bf3fa13bb8
commit
2d2cd2744c
|
@ -36,7 +36,7 @@
|
||||||
(init w h hwnd [gl-config #f])
|
(init w h hwnd [gl-config #f])
|
||||||
(inherit get-cairo-surface)
|
(inherit get-cairo-surface)
|
||||||
(parameterize ([hwnd-param hwnd])
|
(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/override (build-cairo-surface w h)
|
||||||
(define hwnd (hwnd-param))
|
(define hwnd (hwnd-param))
|
||||||
|
|
Loading…
Reference in New Issue
Block a user