Revision 5b22ebf0
Von Moritz Bunkus vor fast 12 Jahren hinzugefügt
| SL/Controller/Helper/Paginated.pm | ||
|---|---|---|
| 61 | 61 |
: $spec->{PAGINATE_ARGS} ? do { my $sub = $spec->{PAGINATE_ARGS}; %{ $self->$sub() } }
|
| 62 | 62 |
: (); |
| 63 | 63 |
my $calculated_params = "SL::DB::Manager::$spec->{MODEL}"->paginate(%paginate_params, args => \%paginate_args);
|
| 64 |
%paginate_params = ( |
|
| 65 |
page => min($paginate_params{page}, $calculated_params->{max}),
|
|
| 66 |
per_page => $paginate_params{per_page},
|
|
| 67 |
num_pages => $calculated_params->{max},
|
|
| 68 |
common_pages => $calculated_params->{common},
|
|
| 69 |
); |
|
| 70 | 64 |
|
| 71 |
# $::lxdebug->dump(0, "get_current_paginate_params: ", \%paginate_params);
|
|
| 65 |
# $::lxdebug->dump(0, "get_current_paginate_params: ", $calculated_params);
|
|
| 72 | 66 |
|
| 73 |
return %paginate_params;
|
|
| 67 |
return %{ $calculated_params };
|
|
| 74 | 68 |
} |
| 75 | 69 |
|
| 76 | 70 |
sub disable_pagination {
|
Auch abrufbar als: Unified diff
Refactoring: In Rückgabewert vom Paginated-DB-Helfer 'cur' in 'page' umbenennen
Dient Konsistenz der Eingangs- und Ausgangsparameter.
Dadurch entfällt auch das Hin- und Herbenennen im
Paginated-Controller-Helfer/im L-Plugin.