Changeset 1609

Show
Ignore:
Timestamp:
07/24/05 18:46:22
Author:
miyagawa
Message:

0.03: Fixed pagination

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • WWW-OpenSearch/trunk/Changes

    r1525 r1609  
    11Revision history for Perl extension WWW::OpenSearch 
     2 
     30.03  Sun Jul 24 02:36:46 PDT 2005 
     4        - Hacked current_page so you can specify page number correctly 
     5          (Thanks to Naoya Ito) 
    26 
    370.02  Sat Mar 26 14:14:58 JST 2005 
    48        - Added accessors for attributes 
    5         - Ficed POD 
     9        - Fixed POD 
    610 
    7110.01  Thu Mar 17 20:45:13 2005 
  • WWW-OpenSearch/trunk/MANIFEST

    r1525 r1609  
    33Makefile.PL 
    44MANIFEST                        This list of files 
     5META.yml                        Module meta-data (added by MakeMaker) 
    56README 
    67t/00_compile.t 
    78t/01_live.t 
    8 META.yml                                 Module meta-data (added by MakeMaker) 
  • WWW-OpenSearch/trunk/MANIFEST.bak

    r1523 r1609  
    33Makefile.PL 
    44MANIFEST                        This list of files 
     5META.yml                        Module meta-data (added by MakeMaker) 
     6README 
    57t/00_compile.t 
     8t/01_live.t 
  • WWW-OpenSearch/trunk/lib/WWW/OpenSearch.pm

    r1525 r1609  
    33use strict; 
    44use vars qw($VERSION); 
    5 $VERSION = '0.02'; 
     5$VERSION = '0.03'; 
    66 
    77use Carp; 
     
    8282    $data->{count}       = $self->pager->entries_per_page; 
    8383    $data->{startIndex}  = $self->pager->first == 0 ? 0 : $self->pager->first - 1; 
    84     $data->{startPage}   = $self->pager->current_page; 
     84    $data->{startPage}   = $self->pager->{current_page}; # XXX hack 
    8585 
    8686    my $url = $self->{Url}; # copy