Skip to content

Commit cefb768

Browse files
committed
Windows: fix slider% range
Closes racket/racket#1865
1 parent 57d45b4 commit cefb768

File tree

1 file changed

+2
-1
lines changed

1 file changed

+2
-1
lines changed

gui-lib/mred/private/wx/win32/slider.rkt

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -125,7 +125,8 @@
125125
(set-size #f #f THICKNESS MIN_LENGTH)
126126
(set-size #f #f MIN_LENGTH THICKNESS)))
127127

128-
(SendMessageW slider-hwnd TBM_SETRANGE 1 (MAKELPARAM lo hi))
128+
(SendMessageW slider-hwnd TBM_SETRANGEMIN 1 lo)
129+
(SendMessageW slider-hwnd TBM_SETRANGEMAX 1 hi)
129130
(set-value val)
130131

131132
(define/override (set-size x y w h)

0 commit comments

Comments
 (0)