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