Skip Menu |

This queue is for tickets about the Net-Amazon CPAN distribution.

Report information
The Basics
Id: 69201
Status: resolved
Priority: 0/
Queue: Net-Amazon

People
Owner: Nobody in particular
Requestors: hsksyusk [...] gmail.com
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in: 0.59
Fixed in: (no value)



Subject: paging problem
I proceed 3 pattern search. result is; setting : search result(Item Number) a. max_pages => 3, page => 1 : No.1~30 b. max_pages => 3, page => 2 : No.11~30 c. max_pages => 3, page => 4 : No.31~40 I want to change result that; setting : search result(Item Number) a. max_pages => 3, page => 1 : No.1~30 b. max_pages => 3, page => 2 : No.31~60 c. max_pages => 3, page => 4 : No.91~120 I fix Net::Amazon::request in my local. that is; my $url = URI->new($self->intl_url($request->amzn_xml_url())); #del my $page = $request->page(); my $page = ( $request->page() - 1 ) * $self->{max_pages} + 1; my $ref; my $max_pages_in_this_search = $self->{max_pages} + $page - 1; #add ~omission~ # Stop if we've fetched max_pages already /* delete start if(defined $page && $self->{max_pages} <= $page) { DEBUG("Fetched max_pages ($self->{max_pages}) -- stopping"); last; } delete end */ /* add start */ if(defined $page && $max_pages_in_this_search <= $page) { DEBUG("Fetched max_pages ($max_pages_in_this_search) -- stopping"); last; } /* add end */
Thank-you for the patch, and detailed explanation. This was fixed in v0.60.