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

(-)a/C4/ILSDI/Services.pm (-2 / +1 lines)
Lines 744-752 sub HoldItem { Link Here
744
    return { code => 'RecordNotFound' } if $$item{biblionumber} ne $biblio->biblionumber;
744
    return { code => 'RecordNotFound' } if $$item{biblionumber} ne $biblio->biblionumber;
745
745
746
    # Check for item disponibility
746
    # Check for item disponibility
747
    my $canitembereserved = C4::Reserves::CanItemBeReserved( $borrowernumber, $itemnumber )->{status};
747
    # CanItemBeReserved codes are passed back too.
748
    my $canbookbereserved = C4::Reserves::CanBookBeReserved( $borrowernumber, $biblionumber )->{status};
748
    my $canbookbereserved = C4::Reserves::CanBookBeReserved( $borrowernumber, $biblionumber )->{status};
749
    return { code => $canitembereserved } unless $canitembereserved eq 'OK';
750
    return { code => $canbookbereserved } unless $canbookbereserved eq 'OK';
749
    return { code => $canbookbereserved } unless $canbookbereserved eq 'OK';
751
750
752
    # Pickup branch management
751
    # Pickup branch management
(-)a/t/db_dependent/ILSDI_Services.t (-2 / +1 lines)
Lines 19-25 use Modern::Perl; Link Here
19
19
20
use CGI qw ( -utf8 );
20
use CGI qw ( -utf8 );
21
21
22
use Test::More tests => 4;
22
use Test::More tests => 5;
23
use Test::MockModule;
23
use Test::MockModule;
24
use t::lib::Mocks;
24
use t::lib::Mocks;
25
use t::lib::TestBuilder;
25
use t::lib::TestBuilder;
26
- 

Return to bug 19945