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

(-)a/C4/ILSDI/Services.pm (-1 / +1 lines)
Lines 230-236 sub GetRecords { Link Here
230
        my $biblioitemnumber = $biblioitem->{'biblioitemnumber'};
230
        my $biblioitemnumber = $biblioitem->{'biblioitemnumber'};
231
        my $holds  = $biblio->current_holds->unblessed;
231
        my $holds  = $biblio->current_holds->unblessed;
232
        my $issues           = GetBiblioIssues($biblionumber);
232
        my $issues           = GetBiblioIssues($biblionumber);
233
        my @items            = $biblio->items;
233
        my @items            = $biblio->items->as_list;
234
234
235
        $biblioitem->{items}->{item} = [];
235
        $biblioitem->{items}->{item} = [];
236
236
(-)a/Koha/Biblio.pm (-3 / +3 lines)
Lines 154-160 sub can_be_transferred { Link Here
154
    my $limittype = C4::Context->preference('BranchTransferLimitsType');
154
    my $limittype = C4::Context->preference('BranchTransferLimitsType');
155
155
156
    my $items;
156
    my $items;
157
    foreach my $item_of_bib ($self->items) {
157
    foreach my $item_of_bib ($self->items->as_list) {
158
        next unless $item_of_bib->holdingbranch;
158
        next unless $item_of_bib->holdingbranch;
159
        next if $from && $from->branchcode ne $item_of_bib->holdingbranch;
159
        next if $from && $from->branchcode ne $item_of_bib->holdingbranch;
160
        return 1 if $item_of_bib->holdingbranch eq $to->branchcode;
160
        return 1 if $item_of_bib->holdingbranch eq $to->branchcode;
Lines 207-213 sub hidden_in_opac { Link Here
207
207
208
    my $rules = $params->{rules} // {};
208
    my $rules = $params->{rules} // {};
209
209
210
    return !(any { !$_->hidden_in_opac({ rules => $rules }) } $self->items);
210
    return !(any { !$_->hidden_in_opac({ rules => $rules }) } $self->items->as_list);
211
}
211
}
212
212
213
=head3 article_request_type
213
=head3 article_request_type
Lines 457-463 sub has_items_waiting_or_intransit { Link Here
457
        return 1;
457
        return 1;
458
    }
458
    }
459
459
460
    foreach my $item ( $self->items ) {
460
    foreach my $item ( $self->items->as_list ) {
461
        return 1 if $item->get_transfer;
461
        return 1 if $item->get_transfer;
462
    }
462
    }
463
463
(-)a/Koha/Schema/Result/SocialData.pm (-3 / +4 lines)
Lines 26-31 __PACKAGE__->table("social_data"); Link Here
26
=head2 isbn
26
=head2 isbn
27
27
28
  data_type: 'varchar'
28
  data_type: 'varchar'
29
  default_value: (empty string)
29
  is_nullable: 0
30
  is_nullable: 0
30
  size: 30
31
  size: 30
31
32
Lines 64-70 __PACKAGE__->table("social_data"); Link Here
64
65
65
__PACKAGE__->add_columns(
66
__PACKAGE__->add_columns(
66
  "isbn",
67
  "isbn",
67
  { data_type => "varchar", is_nullable => 0, size => 30 },
68
  { data_type => "varchar", default_value => "", is_nullable => 0, size => 30 },
68
  "num_critics",
69
  "num_critics",
69
  { data_type => "integer", is_nullable => 1 },
70
  { data_type => "integer", is_nullable => 1 },
70
  "num_critics_pro",
71
  "num_critics_pro",
Lines 92-99 __PACKAGE__->add_columns( Link Here
92
__PACKAGE__->set_primary_key("isbn");
93
__PACKAGE__->set_primary_key("isbn");
93
94
94
95
95
# Created by DBIx::Class::Schema::Loader v0.07046 @ 2018-11-13 15:24:28
96
# Created by DBIx::Class::Schema::Loader v0.07046 @ 2019-04-26 11:35:30
96
# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:l44tYFEfIKX0xXzj6AHInQ
97
# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:0ur/YLKxuN8w2jVUyc8EnA
97
98
98
99
99
# You can replace this text with custom content, and it will be preserved on regeneration
100
# You can replace this text with custom content, and it will be preserved on regeneration
(-)a/t/db_dependent/Koha/Biblio.t (-2 / +1 lines)
Lines 101-107 subtest 'items() tests' => sub { Link Here
101
    is( ref($items), 'Koha::Items', 'Returns a Koha::Items resultset' );
101
    is( ref($items), 'Koha::Items', 'Returns a Koha::Items resultset' );
102
    is( $items->count, 2, 'Two items in resultset' );
102
    is( $items->count, 2, 'Two items in resultset' );
103
103
104
    my @items = $biblio->items;
104
    my @items = $biblio->items->as_list;
105
    is( scalar @items, 2, 'Same result, but in list context' );
105
    is( scalar @items, 2, 'Same result, but in list context' );
106
106
107
    $schema->storage->txn_rollback;
107
    $schema->storage->txn_rollback;
108
- 

Return to bug 15496