From: Sven Schöling Date: Thu, 21 Jul 2011 14:14:55 +0000 (+0200) Subject: Paginating für sehr große Seiten gefixt. X-Git-Tag: release-2.7.0beta1~133 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=fd0c89ad6d22b99e2fe0c7532f4416916b75cf98;p=kivitendo-erp.git Paginating für sehr große Seiten gefixt. --- diff --git a/SL/DB/Helper/Paginated.pm b/SL/DB/Helper/Paginated.pm index e170ad383..c490e2ab6 100644 --- a/SL/DB/Helper/Paginated.pm +++ b/SL/DB/Helper/Paginated.pm @@ -59,9 +59,9 @@ sub make_common_pages { sub calc_visibility { my ($cur, $max, $this) = @_; any { $_ } abs($cur - $this) < 5, - $cur <= 3, - $cur == $max, - any { ! abs ($cur - $this) % $_ } 10, 50, 100, 500, 1000, 5000; + $this <= 3, + $this == $max, + any { abs ($cur - $this) == $_ } 10, 50, 100, 500, 1000, 5000; } 1;