if a view has focus, make Tab give focus to a child widget

1 files changed, 8 insertions, 0 deletions

diff --git a/dw/fltkviewbase.cc b/dw/fltkviewbase.cc
index 0977aac5..feab0ad7 100644
--- a/dw/fltkviewbase.cc
+++ b/dw/fltkviewbase.cc
@@ -295,6 +295,14 @@ int FltkViewBase::handle (int event)
    case FL_UNFOCUS:
       focused_child = fl_oldfocus;
       return 0;
+   case FL_KEYBOARD:
+      if (Fl::event_key() == FL_Tab && this == Fl::focus()) {
+         for (int i = 0; i < children(); i++) {
+            if (child(i)->take_focus())
+               return 1;
+         }
+      }
+      break;
    default:
       break;
    }