use Wx;
my $symbol_table = Symbol::Table->New(PACKAGE=>'main::Wx');
while(my $package = each %$symbol_table) {
  eval "package Groninger::Wx::$package; use base 'Wx::$package;";
}