X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=templates%2Ffactory%2Fpager;h=78c89fd6aa93da92fef0f4d59738b37f52588db5;hb=12d8a77a713d5ed4f08414e5f34e96d45f60e2d3;hp=9053098e37e2ec7eba8c49c47a91895e517dd46c;hpb=5cccc5a89004f9c514e9d611b5e2a02e9aa28ece;p=maypole.git diff --git a/templates/factory/pager b/templates/factory/pager index 9053098..78c89fd 100644 --- a/templates/factory/pager +++ b/templates/factory/pager @@ -1,18 +1,48 @@ +[%# + +=head1 pager + +This controls the pager display at the bottom (by default) of the list +and search views. It expects a C template argument which responds +to the L interface. + +#%] [% IF pager AND pager.first_page != pager.last_page; %] - -

Pages: +

Pages: [% - FOREACH num = [pager.first_page .. pager.last_page]; + UNLESS pager_action; + SET pager_action = request.action; + END; + + SET begin_page = pager.current_page - 10; + IF begin_page < 1; + SET begin_page = pager.first_page; + END; + SET end_page = pager.current_page + 10; + IF pager.last_page < end_page; + SET end_page = pager.last_page; + END; + FOREACH num = [begin_page .. end_page]; IF num == pager.current_page; - "["; num; "] "; + ""; num; ""; ELSE; - ''; - "["; num; "]"; - ' '; + SET label = num; + SET args = "?page=" _ num; + SET args = args _ "&order=" _ request.params.order + IF request.params.order; + SET args = args _ "&o2=desc" + IF request.params.o2 == "desc"; + FOR col = classmetadata.columns.list; + IF request.params.$col; + SET args = args _ "&" _ col _ "=" _ request.params.$col; + SET action = "search"; + END; + END; + link(classmetadata.table, pager_action, args, label); END; END; %] -

+

[% END %]