|
Lines 30-35
use C4::Items;
Link Here
|
| 30 |
use C4::Auth; |
30 |
use C4::Auth; |
| 31 |
use C4::Output; |
31 |
use C4::Output; |
| 32 |
use C4::Biblio; |
32 |
use C4::Biblio; |
|
|
33 |
use Koha::Email; |
| 33 |
|
34 |
|
| 34 |
my $query = new CGI; |
35 |
my $query = new CGI; |
| 35 |
|
36 |
|
|
Lines 50-62
my $email_sender = $query->param('email_sender');
Link Here
|
| 50 |
my $dbh = C4::Context->dbh; |
51 |
my $dbh = C4::Context->dbh; |
| 51 |
|
52 |
|
| 52 |
if ( $email_add ) { |
53 |
if ( $email_add ) { |
| 53 |
my $email_from = C4::Context->preference('KohaAdminEmailAddress'); |
54 |
my $email = Koha::Email->new(); |
|
|
55 |
my %mail = $email->create_message_headers({ to => $email_add }); |
| 54 |
my $comment = $query->param('comment'); |
56 |
my $comment = $query->param('comment'); |
| 55 |
my %mail = ( |
|
|
| 56 |
To => $email_add, |
| 57 |
From => $email_from |
| 58 |
); |
| 59 |
|
| 60 |
my ( $template2, $borrowernumber, $cookie ) = get_template_and_user( |
57 |
my ( $template2, $borrowernumber, $cookie ) = get_template_and_user( |
| 61 |
{ |
58 |
{ |
| 62 |
template_name => "basket/sendbasket.tt", |
59 |
template_name => "basket/sendbasket.tt", |
| 63 |
- |
|
|