Value Sliders would not receive focus when clicked on (STR 911 (wrrooom))

git-svn-id: file:///fltk/svn/fltk/branches/branch-1.1@4426 ea41ed52-d2ee-0310-a9c1-e6b18d33e121

2 files changed, 5 insertions, 0 deletions

diff --git a/CHANGES b/CHANGES
index bf16b3335..296ecbd4d 100644
--- a/CHANGES
+++ b/CHANGES
@@ -2,6 +2,7 @@ CHANGES IN FLTK 1.1.7
 
 	- Documentation fixes (STR #648, STR #692, STR #730, STR
 	  #744, STR #745)
+	- Value Sliders would not receive focus when clicked on (STR #911)
 	- Added redraw of some widgets to show focus change (STR #910)
 	- Fl::set_font would not clear 'pretty' name (STR #902)
 	- Fixed unescaped '@' in fonts demo (STR #867)
diff --git a/src/Fl_Value_Slider.cxx b/src/Fl_Value_Slider.cxx
index d5e39d0b6..834eba74c 100644
--- a/src/Fl_Value_Slider.cxx
+++ b/src/Fl_Value_Slider.cxx
@@ -60,6 +60,10 @@ void Fl_Value_Slider::draw() {
 }
 
 int Fl_Value_Slider::handle(int event) {
+  if (event == FL_PUSH && Fl::visible_focus()) {
+    Fl::focus(this);
+    redraw();
+  }
   int sxx = x(), syy = y(), sww = w(), shh = h();
   if (horizontal()) {
     sxx += 35; sww -= 35;