|
Lines 215-221
sub new {
Link Here
|
| 215 |
while ( my $message = $patron_messages->next ) { |
215 |
while ( my $message = $patron_messages->next ) { |
| 216 |
my $messagedt = dt_from_string( $message->message_date, 'iso' ); |
216 |
my $messagedt = dt_from_string( $message->message_date, 'iso' ); |
| 217 |
my $formatted_date = output_pref( { dt => $messagedt, dateonly => 1 } ); |
217 |
my $formatted_date = output_pref( { dt => $messagedt, dateonly => 1 } ); |
| 218 |
push @messages_array, $formatted_date . ": " . $message->message; |
218 |
push @messages_array, $formatted_date . ": " . $message->message_without_newlines; |
| 219 |
} |
219 |
} |
| 220 |
if (@messages_array) { |
220 |
if (@messages_array) { |
| 221 |
$ilspatron{screen_msg} .= " Messages for you: " . join( ' / ', @messages_array ); |
221 |
$ilspatron{screen_msg} .= " Messages for you: " . join( ' / ', @messages_array ); |