/[Frey]/trunk/lib/Frey/Pager.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/lib/Frey/Pager.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 148 by dpavlin, Wed Jul 16 14:17:46 2008 UTC revision 149 by dpavlin, Wed Jul 16 21:23:27 2008 UTC
# Line 33  has 'items' => ( Line 33  has 'items' => (
33          },          },
34  );  );
35    
36    sub first_item {
37            my $self = shift;
38            $self->items->[0];
39    }
40    
41  sub last_item {  sub last_item {
42          my $self = shift;          my $self = shift;
         warn "## last_item = ",  
43          my $last = $#{ $self->items };          my $last = $#{ $self->items };
44          $self->update_collection if $last < 0;          $self->update_collection if $last < 0;
45          $self->items->[ $#{ $self->items } ];          $self->items->[ $#{ $self->items } ];
# Line 54  sub update_collection { Line 58  sub update_collection {
58    
59          warn "## update_collection from iterator";          warn "## update_collection from iterator";
60    
61            if ( ! $self->fey_class->can('collection') ) {
62                    warn "ERROR: ", $self->fey_class, " can't do collection";
63                    return;
64            }
65    
66          my $i = $self->fey_class->collection( $self->pager );          my $i = $self->fey_class->collection( $self->pager );
67          while ( my $u = $i->next ) {          while ( my $u = $i->next ) {
68                  $self->add_item(                  $self->add_item(
Legend:
Removed from v.148  
changed lines
  Added in v.149
  ViewVC Help
Powered by ViewVC 1.1.26