sub new {
        my ($self, $config) = @_;
        bless $config, UI_Config;
        my $main = $config->getConfig('CUI')->add(
                undef, 'Window',
                -title => 'Main Window',
        );