Lines 177-183
sub notify_owner {
Link Here
|
177 |
); |
177 |
); |
178 |
|
178 |
|
179 |
#send letter to queue |
179 |
#send letter to queue |
180 |
C4::Letters::EnqueueLetter( |
180 |
my $message_id = C4::Letters::EnqueueLetter( |
181 |
{ |
181 |
{ |
182 |
letter => $letter, |
182 |
letter => $letter, |
183 |
message_transport_type => 'email', |
183 |
message_transport_type => 'email', |
Lines 185-190
sub notify_owner {
Link Here
|
185 |
to_address => $toaddr, |
185 |
to_address => $toaddr, |
186 |
} |
186 |
} |
187 |
); |
187 |
); |
|
|
188 |
C4::Letters::SendQueuedMessages({ message_id => $message_id }); |
188 |
} |
189 |
} |
189 |
|
190 |
|
190 |
sub process_addrlist { |
191 |
sub process_addrlist { |
Lines 246-252
sub send_invitekey {
Link Here
|
246 |
); |
247 |
); |
247 |
|
248 |
|
248 |
#send letter to queue |
249 |
#send letter to queue |
249 |
C4::Letters::EnqueueLetter( |
250 |
my $message_id = C4::Letters::EnqueueLetter( |
250 |
{ |
251 |
{ |
251 |
letter => $letter, |
252 |
letter => $letter, |
252 |
message_transport_type => 'email', |
253 |
message_transport_type => 'email', |
Lines 254-259
sub send_invitekey {
Link Here
|
254 |
to_address => $a, |
255 |
to_address => $a, |
255 |
} |
256 |
} |
256 |
); |
257 |
); |
|
|
258 |
C4::Letters::SendQueuedMessages({ message_id => $message_id }) |
257 |
} |
259 |
} |
258 |
$param->{appr_addr} = \@ok; |
260 |
$param->{appr_addr} = \@ok; |
259 |
} |
261 |
} |
260 |
- |
|
|