From 1d3a3085326c1104448cdab52ead1a533f22408e Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Tue, 6 Oct 2015 21:31:34 -0600 Subject: [PATCH] Windows: fix WM_GESTURE handling Broken boolean expression treated `next-scroll-is-change?` backward. --- gui-lib/mred/private/wx/win32/canvas.rkt | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/gui-lib/mred/private/wx/win32/canvas.rkt b/gui-lib/mred/private/wx/win32/canvas.rkt index e71c9982..3ae6300f 100644 --- a/gui-lib/mred/private/wx/win32/canvas.rkt +++ b/gui-lib/mred/private/wx/win32/canvas.rkt @@ -506,9 +506,9 @@ [(= part SB_PAGEDOWN) (min (SCROLLINFO-nMax i) (+ (SCROLLINFO-nPos i) (SCROLLINFO-nPage i)))] [(= part SB_THUMBTRACK) (SCROLLINFO-nTrackPos i)] [else (SCROLLINFO-nPos i)])]) - (unless (or (and (= new-pos (SCROLLINFO-nPos i)) - (not forced-pos)) - next-scroll-is-change?) + (unless (and (= new-pos (SCROLLINFO-nPos i)) + (not forced-pos) + (not next-scroll-is-change?)) (set! next-scroll-is-change? #f) (set-SCROLLINFO-nPos! i new-pos) (set-SCROLLINFO-fMask! i SIF_POS)