Lines Matching refs:marked_indexes

1016 	my @marked_indexes = grep { exists $marked{$_}} (0..$#sorted_widgets);
1018 	return if @marked_indexes == @sorted_widgets;
1022 		push @new_indexes, grep { ! exists $marked{$_}} (0..$marked_indexes[-1]);
1023 		push @new_indexes, ($marked_indexes[-1]+1)
1024 			if $marked_indexes[-1] < $#sorted_widgets;
1025 		push @new_indexes, @marked_indexes;
1026 		if ( $marked_indexes[-1] < $#sorted_widgets - 1) {
1027 			push @new_indexes, ($marked_indexes[-1]+2..$#sorted_widgets);
1030 		push @new_indexes, (0..$marked_indexes[0]-2)
1031 			if $marked_indexes[0] > 1;
1032 		push @new_indexes, @marked_indexes;
1034 		push @new_indexes, ($marked_indexes[0]-1)
1035 			if $marked_indexes[0] > 0;
1036 		push @new_indexes, grep { ! exists $marked{$_}} ($marked_indexes[0]..$#sorted_widgets);