Re: pager

[prev] [thread] [next] [Date index for 2004/10/21]

From: David R. Baird
Subject: Re: pager
Date: 23:08 on 21 Oct 2004

On 21 Oct 2004 at 5:10, Randal L. Schwartz wrote:

> No, look at how requests_redirectable can be used to get and set
> the list of redirectable requests, or I can subclass and provide
> my own redirect_ok instead, with the default implementation looking
> at the current setting of requests_redirectable.
> 
> Thus, I can simply configurure on ->new or a subsequent
> ->requests_redirectable as to how I want to do it, or I can create a
> full subclass that overrides the redirect_ok method (and possibly
> the requests_redirectable if I want somewhat compatible behavior).
> 
> This is a good pattern to follow, if you can.
> 


I think I've got the idea. Version 3 now looks like this - all 
settings (including syntax) can be set through individual setters, or 
in the constructor, or in the search_where call:

=head1 NAME

Class::DBI::Plugin::Pager - paged queries for CDBI

=head1 SYNOPSIS

    package CD;
    use base 'Class::DBI';

    use Class::DBI::Plugin::AbstractCount;      # pager needs this
    use Class::DBI::Plugin::Pager;

    # or to use a different LIMIT syntax
    # use Class::DBI::Plugin::Pager::RowsTo;

    __PACKAGE__->set_db(...);


    # in a nearby piece of code...

    use CD;

    # see SQL::Abstract for how to specify the query
    my $where = { ... };

    my $order_by => [ qw( foo bar ) ];

    # bit by bit:
    my $pager = CD->pager;

    $pager->per_page( 10 );
    $pager->page( 3 );
    $pager->where( $where );
    $pager->order_by( $order_by );

    $pager->set_syntax( 'RowsTo' );

    my @cds = $pager->search_where;

    # or all at once

    my $pager = CD->pager( $where, $order_by, 10, 3 );

    my @cds = $pager->search_where;

    # or

    my $pager = CD->pager;

    my @cds = $pager->search_where( $where, $order_by, 10, 3 );

    # $pager isa Data::Page
    # @cds contains the CDs just for the current page


I'll try and get it on CPAN tonight.

Cheers,

d.


        -- 
        Dr. David R. Baird
Riverside Content Management Systems
http://www.riverside-cms.co.uk