my $dropdwnMidiPort = $midiCtrls->BrowseEntry(
    -choices          => \@midi_outdevs,
    -state            => 'readonly',
    -justify          => 'right',
    -variable         => \$midi_outdev,
    -browsecmd        => sub { $midi_indev = $midi_outdev;
			       MidiConSetup('out');
			       MidiConSetup('in'); },
    -font             => 'Helvetica -12 bold',
    -disabledforeground => 'black')->grid(
    -row              => 0,
    -column           => 0);
$dropdwnMidiPort->Subwidget('slistbox')->configure(
    -selectbackground => 'IndianRed4',
    -selectforeground => 'white');