Revision 6750c6aa
Von Jan Büren vor etwa 6 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 1344 | 1344 |
|
| 1345 | 1345 |
sub generate_email_body {
|
| 1346 | 1346 |
$main::lxdebug->enter_sub(); |
| 1347 |
my ($self) = @_; |
|
| 1347 |
my ($self, %params) = @_;
|
|
| 1348 | 1348 |
# simple german and english will work grammatically (most european languages as well) |
| 1349 | 1349 |
# Dear Mr Alan Greenspan: |
| 1350 | 1350 |
# Sehr geehrte Frau Meyer, |
| ... | ... | |
| 1352 | 1352 |
# Gentile Signora Ferrari, |
| 1353 | 1353 |
my $body = ''; |
| 1354 | 1354 |
|
| 1355 |
if ($self->{cp_id}) {
|
|
| 1355 |
if ($self->{cp_id} && !$params{inv_email}) {
|
|
| 1356 | 1356 |
my $givenname = SL::DB::Contact->load_cached($self->{cp_id})->cp_givenname; # for qw(gender givename name);
|
| 1357 | 1357 |
my $name = SL::DB::Contact->load_cached($self->{cp_id})->cp_name; # for qw(gender givename name);
|
| 1358 | 1358 |
my $gender = SL::DB::Contact->load_cached($self->{cp_id})->cp_gender; # for qw(gender givename name);
|
Auch abrufbar als: Unified diff
Rechnungsversand E-Mail-Body
Falls die generische E-Mail-Adresse verwendet wird, sollte auch
die generische Anrede hinterlegt sein, selbst wenn ein Ansprechpartner
noch in CC gesetzt wird.