X-Git-Url: http://git.shiar.net/perl/list-index.git/blobdiff_plain/1c9de66914ea7bf8525df6f5285b649c006477b9..f467842b8e311a78d9900c4626583fc08a8ce31b:/lib/List/Index.pm?ds=sidebyside

diff --git a/lib/List/Index.pm b/lib/List/Index.pm
index dca0d1f..483d1eb 100644
--- a/lib/List/Index.pm
+++ b/lib/List/Index.pm
@@ -23,7 +23,7 @@ sub ranges {
 	my $pages    = $options->{pages   } || 1 + int $#$self / $pagesize;
 
 	$pagesize = @$self / $pages;
-	my $offset = $pagesize;
+	my $offset = $pagesize + .5;
 	my @links = ('');
 	while ($offset < @$self) {
 		my $link = substr $self->[$offset], 0, $length;