--- Curses-UI-0.95/lib/Curses/UI/Listbox.pm.pix 2006-10-17 09:42:55.000000000 +0200 +++ Curses-UI-0.95/lib/Curses/UI/Listbox.pm 2006-10-17 09:59:02.000000000 +0200 @@ -314,6 +314,14 @@ return $this->{-ypos};; } +sub set_active_id +{ + my $this = shift; + my $id = shift; + $this->{-ypos} = $id; + return $this; +} + sub draw(;$) { my $this = shift; @@ -930,6 +938,10 @@ This method will return the index of the currently active (i.e highlighted line). +=item * B<set_active_id> ( INDEX ) + +This method will set the currently active (i.e highlighted line). + =item * B<set_selection> ( LIST ) This method marks the items at the positions specified in LIST