my $text_data = $combi_window->Text( -height => 8, width => 122 );
my $be_add =    $combi_window->JBrowseEntry( -state => 'readonly', -variable => \$headline, -choices => \@headlines, -width => 20);
$be_add->configure( -browsecmd => sub { $text_data->Insert( "$start_data$headline$end_data"); $text_data->focus; } );