Use the function get-client-{w,h} instead of the syntax.

apg · Jun 26, 2019 · 63ccc97 · 63ccc97
1 parent d9275b8
commit 63ccc97
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/slideshow/simple/lang/reader.rkt b/slideshow/simple/lang/reader.rkt
@@ -220,8 +220,8 @@
 (define (stage-image-slide node)
   `(slide (scale-to-fit (bitmap
                          ,(image-slide-path node))
-                        (client-w)
-                        (client-h)
+                        (get-client-w)
+                        (get-client-h)
                         #:mode 'preserve)
           ,(render-notes node image-slide-notes)))