Revision 568004ba
Von Martin Helmling martin.helmling@octosoft.eu vor etwa 8 Jahren hinzugefügt
| SL/Controller/EmailJournal.pm | ||
|---|---|---|
|
my $ref = \$attachment->content;
|
||
|
if ( $attachment->file_id > 0 ) {
|
||
|
my $file = SL::File->get(id => $attachment->file_id );
|
||
|
$ref = SL::File->get_content(dbfile => $file) if $file;
|
||
|
$ref = $file->get_content if $file;
|
||
|
}
|
||
|
$self->send_file($ref, name => $attachment->name, type => $attachment->mime_type);
|
||
|
}
|
||
| SL/Form.pm | ||
|---|---|---|
|
}
|
||
|
}
|
||
|
foreach my $attfile ( @attfiles ) {
|
||
|
push @{ $mail->{attachments} }, { path => SL::File->get_file_path(dbfile => $attfile),
|
||
|
push @{ $mail->{attachments} }, { path => $attfile->get_file,
|
||
|
id => $attfile->id,
|
||
|
type => $attfile->file_mime_type,
|
||
|
type => $attfile->mime_type,
|
||
|
name => $attfile->file_name };
|
||
|
}
|
||
|
}
|
||
Auch abrufbar als: Unified diff
Revert Revert "Anpassungen an neues SL::File::Object Interface"
Änderungen in Dateien ohne Compilerfehler wieder dazu