From e83b73e1f9cfcf59b38c9ab2cefed593059977f2 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Fri, 28 Apr 2006 16:46:48 +0000
Subject: [PATCH] set-value on disabled slider keeps it disabled

svn: r2837
---
 src/wxwindow/src/msw/wx_slidr.cxx | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/src/wxwindow/src/msw/wx_slidr.cxx b/src/wxwindow/src/msw/wx_slidr.cxx
index be6dec228d..99fe80ee80 100644
--- a/src/wxwindow/src/msw/wx_slidr.cxx
+++ b/src/wxwindow/src/msw/wx_slidr.cxx
@@ -276,6 +276,11 @@ void wxSlider::SetValue(int value)
     sprintf(wxBuffer, "%d", value);
     SetWindowText(edit_value, wxBuffer);
   }
+
+  if (!winEnabled) {
+    /* Windows bug? Setting the value loses disabled state. */
+    ::EnableWindow((HWND)ms_handle, (BOOL)FALSE); 
+  }
 }
 
 void wxSlider::SetLabel(char *label)