Revision 26993da6
Von Bernd Bleßmann vor etwa 3 Jahren hinzugefügt
| bin/mozilla/io.pl | ||
|---|---|---|
| 2114 | 2114 |
} |
| 2115 | 2115 |
|
| 2116 | 2116 |
$::form->{all_employees} = SL::DB::Manager::Employee->get_all(query => [ deleted => 0 ]);
|
| 2117 |
|
|
| 2117 | 2118 |
my $email_form = {
|
| 2118 | 2119 |
to => $email, |
| 2119 | 2120 |
cc => $email_cc, |
| ... | ... | |
| 2125 | 2126 |
|
| 2126 | 2127 |
my %files = _get_files_for_email_dialog(); |
| 2127 | 2128 |
my $html = $::form->parse_html_template("common/_send_email_dialog", {
|
| 2128 |
email_form => $email_form, |
|
| 2129 |
show_bcc => $::auth->assert('email_bcc', 'may fail'),
|
|
| 2130 |
FILES => \%files, |
|
| 2131 |
is_customer => $::form->{vc} eq 'customer',
|
|
| 2129 |
email_form => $email_form,
|
|
| 2130 |
show_bcc => $::auth->assert('email_bcc', 'may fail'),
|
|
| 2131 |
FILES => \%files,
|
|
| 2132 |
is_customer => $::form->{vc} eq 'customer',
|
|
| 2132 | 2133 |
is_invoice_mail => ($record_email && $::form->{type} eq 'invoice'),
|
| 2133 | 2134 |
ALL_EMPLOYEES => $::form->{all_employees},
|
| 2134 | 2135 |
}); |
Auch abrufbar als: Unified diff
Kosmetik