cache pages should start with "1"

git-svn-id: svn://svn.open-ils.org/ILS/trunk@1170 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Storage/FTS.pm b/Open-ILS/src/perlmods/OpenILS/Application/Storage/FTS.pm
index 5564ed8..7f32cf3 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/FTS.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/FTS.pm
@@ -177,7 +177,7 @@ package Class::DBI;
 
                @args = %{ $args[0] } if ref $args[0] eq "HASH";
 
-               $search_opts->{offset} = int($search_opts->{page}) * int($search_opts->{page_size})  if ($search_opts->{page_size});
+               $search_opts->{offset} = int($search_opts->{page} - 1) * int($search_opts->{page_size})  if ($search_opts->{page_size});
                $search_opts->{_placeholder} ||= '?';
 
                my @frags;