Lines 22-27
use CGI qw ( -utf8 );
Link Here
|
22 |
use C4::Auth qw(get_template_and_user checkpw); |
22 |
use C4::Auth qw(get_template_and_user checkpw); |
23 |
use C4::Circulation; |
23 |
use C4::Circulation; |
24 |
use C4::Output; |
24 |
use C4::Output; |
|
|
25 |
use Koha::Items; |
25 |
|
26 |
|
26 |
use List::MoreUtils qw( uniq ); |
27 |
use List::MoreUtils qw( uniq ); |
27 |
use Try::Tiny; |
28 |
use Try::Tiny; |
Lines 64-71
if ( $op eq 'check_in' ) {
Link Here
|
64 |
# Return items |
65 |
# Return items |
65 |
foreach my $barcode (@barcodes) { |
66 |
foreach my $barcode (@barcodes) { |
66 |
try { |
67 |
try { |
67 |
my ( $success, $messages, $checkout, $patron ) = |
68 |
my ( $success, $messages, $checkout, $patron ); |
68 |
AddReturn( $barcode, $library ); |
69 |
my $item = Koha::Items->find( { barcode => $barcode } ); |
|
|
70 |
my $human_required = 0; |
71 |
if ( C4::Context->preference("CircConfirmItemParts") |
72 |
&& defined($item) |
73 |
&& $item->materials ) |
74 |
{ |
75 |
$human_required = 1; |
76 |
$success = 0; |
77 |
$messages->{additional_materials} = 1; |
78 |
} |
79 |
|
80 |
( $success, $messages, $checkout, $patron ) = |
81 |
AddReturn( $barcode, $library ) unless $human_required; |
69 |
if ($success) { |
82 |
if ($success) { |
70 |
push @success, |
83 |
push @success, |
71 |
{ |
84 |
{ |
72 |
- |
|
|