Revision d9ff130d
Von Moritz Bunkus vor mehr als 4 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 1372 | 1372 |
|
| 1373 | 1373 |
return undef unless $body; |
| 1374 | 1374 |
|
| 1375 |
$body .= GenericTranslations->get(translation_type =>"salutation_punctuation_mark", language_id => $self->{language_id}) . "\n";
|
|
| 1376 |
$body .= GenericTranslations->get(translation_type =>"preset_text_$self->{formname}", language_id => $self->{language_id});
|
|
| 1375 |
my $translation_type = $params{translation_type} // "preset_text_$self->{formname}";
|
|
| 1376 |
my $main_body = GenericTranslations->get(translation_type => $translation_type, language_id => $self->{language_id});
|
|
| 1377 |
$main_body = GenericTranslations->get(translation_type => $params{fallback_translation_type}, language_id => $self->{language_id}) if !$main_body && $params{fallback_translation_type};
|
|
| 1378 |
$body .= GenericTranslations->get(translation_type => "salutation_punctuation_mark", language_id => $self->{language_id}) . "\n\n";
|
|
| 1379 |
$body .= $main_body; |
|
| 1377 | 1380 |
|
| 1378 | 1381 |
$body = $main::locale->unquote_special_chars('HTML', $body);
|
| 1379 | 1382 |
|
Auch abrufbar als: Unified diff
E-Mail-Versand: vorbelegter Text für Rechnungen mit aktiviertem Bankeinzug