Revision 43c822f5
Von Bernd Bleßmann vor fast 2 Jahren hinzugefügt
| SL/Controller/Letter.pm | ||
|---|---|---|
| 240 | 240 |
# set some form defaults for printing webdav copy variables |
| 241 | 241 |
if ( $::form->{media} eq 'email') {
|
| 242 | 242 |
my $mail = Mailer->new; |
| 243 |
my $signature = $::myconfig{signature};
|
|
| 244 | 243 |
$mail->{$_} = $params{email}->{$_} for qw(to cc subject message bcc);
|
| 245 | 244 |
$mail->{from} = qq|"$::myconfig{name}" <$::myconfig{email}>|;
|
| 246 | 245 |
$mail->{attachments} = [{ path => $result{file_name},
|
Auch abrufbar als: Unified diff
E-Mail-Versand von Briefen: unbenutzte Variable entfernt
Hatte ich eben übersehen.