x11: Fix calls to x-display-image.

This takes integer coordinates, not floating-point coordinates.

(cherry picked from commit 6469c2672b0b01c0381334b8e75d65123c3c4cdf)

diff --git a/src/x11/x11-device.scm b/src/x11/x11-device.scm
index fb7c25e720cc4193e17811a9006498999c51cff0..7741c7c57e9d136bc8b1779f633dc47b1266cccf 100644 (file)
--- a/src/x11/x11-device.scm
+++ b/src/x11/x11-device.scm
@@ -788,8 +788,8 @@ USA.
                   0
                   0
                   (x-image/window image)
-                  (->flonum window-x)
-                  (->flonum window-y)
+                  window-x
+                  window-y
                   (x-image/width image)
                   (x-image/height image)))
 
@@ -798,8 +798,8 @@ USA.
                   x
                   y
                   (x-image/window image)
-                  (->flonum window-x)
-                  (->flonum window-y)
+                  window-x
+                  window-y
                   width
                   height))
 
@@ -830,8 +830,8 @@ USA.
                     0
                     0
                     (x-graphics-device/xw device)
-                    (->flonum x)
-                    (->flonum y)
+                    x
+                    y
                     w
                     h)))