View | Details | Raw Unified | Return to bug 10856
Collapse All | Expand All

(-)a/C4/ShelfBrowser.pm (-6 / +11 lines)
Lines 172-178 sub GetNearbyItems { Link Here
172
172
173
    my $sth_prev_items = $dbh->prepare($prev_query . $query_cond . ' ORDER BY cn_sort DESC, itemnumber LIMIT ?');
173
    my $sth_prev_items = $dbh->prepare($prev_query . $query_cond . ' ORDER BY cn_sort DESC, itemnumber LIMIT ?');
174
    my $sth_next_items = $dbh->prepare($next_query . $query_cond . ' ORDER BY cn_sort, itemnumber LIMIT ?');
174
    my $sth_next_items = $dbh->prepare($next_query . $query_cond . ' ORDER BY cn_sort, itemnumber LIMIT ?');
175
    push @params, $num_each_side;
175
    push @params, $num_each_side + 1;
176
    $sth_prev_items->execute(@params);
176
    $sth_prev_items->execute(@params);
177
    $sth_next_items->execute(@params);
177
    $sth_next_items->execute(@params);
178
    
178
    
Lines 185-195 sub GetNearbyItems { Link Here
185
        $prev_itemnumber, $prev_biblionumber
185
        $prev_itemnumber, $prev_biblionumber
186
    );
186
    );
187
187
188
    $next_itemnumber = $next_items[-1]->{itemnumber} if @next_items;
188
    if ( @next_items and $#next_items > $num_each_side - 1 ) {
189
    $next_biblionumber = $next_items[-1]->{biblionumber} if @next_items;
189
        my $next_item = pop @next_items;
190
        $next_itemnumber = $next_item->{itemnumber};
191
        $next_biblionumber = $next_item->{biblionumber};
192
    }
190
193
191
    $prev_itemnumber = $prev_items[0]->{itemnumber} if @prev_items;
194
    if ( @prev_items and $#prev_items > $num_each_side - 1 ) {
192
    $prev_biblionumber = $prev_items[0]->{biblionumber} if @prev_items;
195
        my $prev_item = shift @prev_items;
196
        $prev_itemnumber = $prev_item->{itemnumber};
197
        $prev_biblionumber = $prev_item->{biblionumber};
198
    }
193
199
194
    my %result = (
200
    my %result = (
195
        next                => \@next_items,
201
        next                => \@next_items,
196
- 

Return to bug 10856