From c8f4e4476014c5491ce1668f61b36a10e1f9a054 Mon Sep 17 00:00:00 2001 From: miker Date: Wed, 13 Jul 2005 15:55:56 +0000 Subject: [PATCH] cache pages should start with "1" git-svn-id: svn://svn.open-ils.org/ILS/trunk@1170 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/Application/Storage/FTS.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Storage/FTS.pm b/Open-ILS/src/perlmods/OpenILS/Application/Storage/FTS.pm index 5564ed8ec9..7f32cf3769 100644 --- 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; -- 2.11.0