NAME

Template::Plugin::Pageset - wrapper for Data::Page::Pageset

SYNOPSIS

# pager is a Data::Page object
[% USE pageset = Pageset( pager ) %] # pages_per_set is using default 10
[% USE pageset = Pageset( pager, 7 ) %] # pages_per_set is 7
[% USE pageset = Pageset( pager, { pages_per_set => 12 } ) %] # set max_pagesets to be 12
[% USE pageset = Pageset( pager, { max_pagesets => 4 } ) %] # set max_pagesets to be 4

DESCRIPTION

[% IF pageset.previous_pageset %]
	<a href="JavaScript:goto_page('[% pageset.previous_pageset.middle %]');">Previous Pageset</a>&nbsp;
[% END %]

[% FOREACH chunk = pageset.total_pagesets %]
	[% IF chunk.is_current %]
		[% FOREACH num = [ chunk.first .. chunk.last ] %]
			[% IF num == pager.current_page %]
				<b>[% num %]</b>
			[% ELSE %]
				<a href="JavaScript:goto_page('[% num %]');">[% num %]</a>
			[% END %]
		[% END %]
	[% ELSE %]
		<a href="JavaScript:goto_page('[% chunk.first %]');">[% chunk %]</a>
	[% END %]
[% END %]

[% IF pageset.next_pageset %]
	<a href="JavaScript:goto_page('[% pageset.next_pageset.middle %]');">Next Pageset</a>&nbsp;
[% END %]

See Also

Data::Page::Pageset is the core one, more methods see that pod.

AUTHOR

Chun Sheng, <me@chunzi.org>

COPYRIGHT

Copyright (C) 2004-2005, Chun Sheng

This module is free software; you can redistribute it or modify it under the same terms as Perl itself.