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

(-)a/C4/Items.pm (-3 / +3 lines)
Lines 1249-1255 sub GetHiddenItemnumbers { Link Here
1249
        # Don't hide anything from this borrower category
1249
        # Don't hide anything from this borrower category
1250
        return;
1250
        return;
1251
    }
1251
    }
1252
    
1252
1253
    my @resultitems;
1253
    my @resultitems;
1254
    my $yaml = C4::Context->preference('OpacHiddenItems');
1254
    my $yaml = C4::Context->preference('OpacHiddenItems');
1255
    return () if (! $yaml =~ /\S/ );
1255
    return () if (! $yaml =~ /\S/ );
Lines 1383-1396 sub Item2Marc { Link Here
1383
1383
1384
=head2 GetMarcItemFields
1384
=head2 GetMarcItemFields
1385
1385
1386
  my @marc_fields = GetMarcItemFields($biblionumber);
1386
    my @marc_fields = GetMarcItemFields($biblionumber);
1387
1387
1388
Returns an array of MARC::Record objects of the items for the biblio.
1388
Returns an array of MARC::Record objects of the items for the biblio.
1389
1389
1390
=cut
1390
=cut
1391
1391
1392
sub GetMarcItemFields {
1392
sub GetMarcItemFields {
1393
	my ( $biblionumber, $itemnumbers, $hidingrules ) = @_;
1393
    my ( $biblionumber, $itemnumbers, $hidingrules ) = @_;
1394
1394
1395
    my $item_level_itype = C4::Context->preference('item-level_itypes');
1395
    my $item_level_itype = C4::Context->preference('item-level_itypes');
1396
    # This is so much faster than using Koha::Items->search that it makes sense even if it's ugly.
1396
    # This is so much faster than using Koha::Items->search that it makes sense even if it's ugly.
(-)a/t/db_dependent/Items.t (-2 / +1 lines)
Lines 998-1004 subtest 'tests for GetMarcItem' => sub { Link Here
998
subtest 'tests for GetMarcItemFields' => sub {
998
subtest 'tests for GetMarcItemFields' => sub {
999
    plan tests => 5;
999
    plan tests => 5;
1000
    $schema->storage->txn_begin;
1000
    $schema->storage->txn_begin;
1001
    
1001
1002
    #Setup the information we need
1002
    #Setup the information we need
1003
    my $builder  = t::lib::TestBuilder->new;
1003
    my $builder  = t::lib::TestBuilder->new;
1004
    my $library  = $builder->build({ source => 'Branch', });
1004
    my $library  = $builder->build({ source => 'Branch', });
1005
- 

Return to bug 20664