Gtk/Perl question

[David Turner <novalis@novalis.org>]

Code frag:

    $genre_entry = new Gtk::OptionMenu(); 
    my $genre_menu = new Gtk::Menu ();

    foreach (sort @mp3_genres) {
	my $genre_item = new Gtk::MenuItem ($_);
	$genre_item->show ();
	$genre_menu->append ($genre_item);
    }

    $genre_entry->set_menu ($genre_menu);

Context:

I'm trying to make a MP3 organizer.  This fragment aims to create a
drop-down list of the genres, so that I can choose one for the track.  

Problem:

There are 148 genres.  My screen only holds 43 of them.  I want the list
to scroll or something so I can select Ska.  I tried to find another Gtk
program that did the right thing, but the only Gtk program with an
option menu I could expand sufficiently the Bump Map filter in GIMP -
and it had the same problem.  

Does anyone have any idea how I could make this work?  Or, is there a
better widget to use for this?
 
-- 
-Dave Turner | The corporation and its subordinate divisions shall
-------------| have the sole and exclusive right to use the name, "Blue
Star Mothers of America, Inc.", and no other organization shall use the 
name "Blue Star Mothers of America, Inc.".  -US Code Title 36, Sec. 956
**Majordomo list services provided by PANIX <URL:http://www.panix.com>**
**To Unsubscribe, send "unsubscribe phl" to majordomo@lists.pm.org**