|
Lines 1002-1008
sub SendQueuedMessages {
Link Here
|
| 1002 |
return unless $message_object->store; |
1002 |
return unless $message_object->store; |
| 1003 |
|
1003 |
|
| 1004 |
# warn Data::Dumper->Dump( [ $message ], [ 'message' ] ); |
1004 |
# warn Data::Dumper->Dump( [ $message ], [ 'message' ] ); |
| 1005 |
warn sprintf( 'sending %s message to patron: %s', |
1005 |
warn sprintf( 'Processing %s message to patron: %s', |
| 1006 |
$message->{'message_transport_type'}, |
1006 |
$message->{'message_transport_type'}, |
| 1007 |
$message->{'borrowernumber'} || 'Admin' ) |
1007 |
$message->{'borrowernumber'} || 'Admin' ) |
| 1008 |
if $params->{'verbose'}; |
1008 |
if $params->{'verbose'}; |
| 1009 |
- |
|
|