From 94a2346351c09f50533e3721b68d1ad1c38ac435 Mon Sep 17 00:00:00 2001 From: Jay McCarthy Date: Sat, 8 Dec 2012 07:32:35 -0700 Subject: [PATCH] Disabling the other screen->client call on X, re: DrDr original commit: 1b6c4f0e727e907568e756441faaf4c0351a24b6 --- collects/tests/gracket/windowing.rktl | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/collects/tests/gracket/windowing.rktl b/collects/tests/gracket/windowing.rktl index 3452d43b..01ab90bc 100644 --- a/collects/tests/gracket/windowing.rktl +++ b/collects/tests/gracket/windowing.rktl @@ -216,10 +216,12 @@ [client->screen-tests (lambda () (printf "Client<->Screen\n") - (let-values ([(x y) (send f client->screen 0 0)]) - (stvals '(0 0) f screen->client x y)) - (let-values ([(x y) (send f screen->client 0 0)]) - (stvals '(0 0) f client->screen x y)))] + (X-FAILS + (let-values ([(x y) (send f client->screen 0 0)]) + (stvals '(0 0) f screen->client x y))) + (X-FAILS + (let-values ([(x y) (send f screen->client 0 0)]) + (stvals '(0 0) f client->screen x y))))] [container-tests (lambda () (printf "Container\n")