From bc1b954d5397588cdb899c7f8f33efdd24eb61fb Mon Sep 17 00:00:00 2001 From: Leo Prikler Date: Sat, 5 Dec 2020 20:40:37 +0100 Subject: render: Make set-renderer-scale! actually set scale. --- sdl2/render.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/sdl2/render.scm b/sdl2/render.scm index 05518cb..eb4661c 100644 --- a/sdl2/render.scm +++ b/sdl2/render.scm @@ -159,8 +159,8 @@ color." (define (set-renderer-scale! renderer scale-x scale-y) "Set the drawing scale of RENDERER according to SCALE-X and SCALE-Y scaling factors." - (unless (zero? (ffi:sdl-render-set-logical-size (unwrap-renderer renderer) - scale-x scale-y)) + (unless (zero? (ffi:sdl-render-set-scale (unwrap-renderer renderer) + scale-x scale-y)) (sdl-error "set-renderer-scale!" "Failed to set scale"))) (define (renderer-integer-scale renderer) -- cgit v1.2.3