X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/8378f2cf7bde1116fd9618781fc14b991f5e2290..fd0c89ad6d22b99e2fe0c7532f4416916b75cf98:/SL/DB/Helper/Paginated.pm 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;