Lines 1020-1026
sub ModReserve {
Link Here
|
1020 |
'borrowers', $hold_borrowernumber |
1020 |
'borrowers', $hold_borrowernumber |
1021 |
} |
1021 |
} |
1022 |
); |
1022 |
); |
1023 |
C4::Message->enqueue($letter, $hold_borrower->unblessed, 'email'); |
1023 |
|
|
|
1024 |
my $messaging_preferences = C4::Members::Messaging::GetMessagingPreferences({ borrowernumber => $hold_borrowernumber, message_name => 'Hold_Manually_Cancelled' }); |
1025 |
|
1026 |
while ( my ( $transport, $letter_code ) = each %{ $messaging_preferences->{transports} } ){ |
1027 |
if ( $transport eq 'email' ){ |
1028 |
C4::Message->enqueue($letter, $hold_borrower->unblessed, 'email'); |
1029 |
} |
1030 |
} |
1024 |
} elsif ($rank =~ /^\d+/ and $rank > 0) { |
1031 |
} elsif ($rank =~ /^\d+/ and $rank > 0) { |
1025 |
logaction( 'HOLDS', 'MODIFY', $hold->reserve_id, Dumper($hold->unblessed) ) |
1032 |
logaction( 'HOLDS', 'MODIFY', $hold->reserve_id, Dumper($hold->unblessed) ) |
1026 |
if C4::Context->preference('HoldsLog'); |
1033 |
if C4::Context->preference('HoldsLog'); |
Lines 1235-1241
sub ModReserveCancelAll {
Link Here
|
1235 |
'borrowers', $hold_borrowernumber |
1242 |
'borrowers', $hold_borrowernumber |
1236 |
} |
1243 |
} |
1237 |
); |
1244 |
); |
1238 |
C4::Message->enqueue($letter, $hold_borrower->unblessed, 'email'); |
1245 |
|
|
|
1246 |
my $messaging_preferences = C4::Members::Messaging::GetMessagingPreferences({ borrowernumber => $hold_borrowernumber, message_name => 'Hold_Manually_Cancelled' }); |
1247 |
|
1248 |
while ( my ( $transport, $letter_code ) = each %{ $messaging_preferences->{transports} } ){ |
1249 |
if ( $transport eq 'email' ){ |
1250 |
C4::Message->enqueue($letter, $hold_borrower->unblessed, 'email'); |
1251 |
} |
1252 |
} |
1239 |
|
1253 |
|
1240 |
#step 2 launch the subroutine of the others reserves |
1254 |
#step 2 launch the subroutine of the others reserves |
1241 |
( $messages, $nextreservinfo ) = GetOtherReserves($itemnumber); |
1255 |
( $messages, $nextreservinfo ) = GetOtherReserves($itemnumber); |