|
Lines 97-108
if ( $op eq 'addreport' ) {
Link Here
|
| 97 |
my $transport = 'email'; |
97 |
my $transport = 'email'; |
| 98 |
my $reply_address = $patron->email || $patron->emailpro || $patron->B_email; |
98 |
my $reply_address = $patron->email || $patron->emailpro || $patron->B_email; |
| 99 |
|
99 |
|
| 100 |
if ( $recipient eq 'admin' ) { |
100 |
if ( $recipient eq 'library' and defined($library->get_effective_email) and $library->get_effective_email ne C4::Context->preference('KohaAdminEmailAddress') ) { |
|
|
101 |
# the problem report is intended for a librarian and will be received at a library email address |
| 101 |
C4::Letters::EnqueueLetter({ |
102 |
C4::Letters::EnqueueLetter({ |
| 102 |
letter => $letter, |
103 |
letter => $letter, |
| 103 |
borrowernumber => $borrowernumber, |
104 |
borrowernumber => $borrowernumber, |
| 104 |
message_transport_type => $transport, |
105 |
message_transport_type => $transport, |
| 105 |
to_address => C4::Context->preference('KohaAdminEmailAddress'), |
106 |
to_address => $library->get_effective_email, |
| 106 |
reply_address => $reply_address, |
107 |
reply_address => $reply_address, |
| 107 |
}); |
108 |
}); |
| 108 |
} else { |
109 |
} else { |
|
Lines 110-116
if ( $op eq 'addreport' ) {
Link Here
|
| 110 |
letter => $letter, |
111 |
letter => $letter, |
| 111 |
borrowernumber => $borrowernumber, |
112 |
borrowernumber => $borrowernumber, |
| 112 |
message_transport_type => $transport, |
113 |
message_transport_type => $transport, |
| 113 |
to_address => $library->get_effective_email, |
114 |
to_address => C4::Context->preference('KohaAdminEmailAddress'), |
| 114 |
reply_address => $reply_address, |
115 |
reply_address => $reply_address, |
| 115 |
}); |
116 |
}); |
| 116 |
} |
117 |
} |
| 117 |
- |
|
|