|
Lines 134-141
foreach my $type (@types) {
Link Here
|
| 134 |
borrowers => $issues->{'borrowernumber'}, |
134 |
borrowers => $issues->{'borrowernumber'}, |
| 135 |
biblio => $issues->{'biblionumber'}, |
135 |
biblio => $issues->{'biblionumber'}, |
| 136 |
biblioitems => $issues->{'biblionumber'}, |
136 |
biblioitems => $issues->{'biblionumber'}, |
| 137 |
message_transport_type => 'phone', |
|
|
| 138 |
}, |
137 |
}, |
|
|
138 |
message_transport_type => 'phone', |
| 139 |
); |
139 |
); |
| 140 |
|
140 |
|
| 141 |
die "No letter found for type $type!... dying\n" unless $letter; |
141 |
die "No letter found for type $type!... dying\n" unless $letter; |
| 142 |
- |
|
|