Revision 17c2f7bd
Von Bernd Bleßmann vor etwa 4 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 1270 | 1270 |
return $formname_translations{$formname};
|
| 1271 | 1271 |
} |
| 1272 | 1272 |
|
| 1273 |
sub get_cusordnumber_translation {
|
|
| 1274 |
$main::lxdebug->enter_sub(); |
|
| 1275 |
my ($self, $formname) = @_; |
|
| 1276 |
|
|
| 1277 |
$formname ||= $self->{formname};
|
|
| 1278 |
|
|
| 1279 |
$self->{recipient_locale} ||= Locale->lang_to_locale($self->{language});
|
|
| 1280 |
local $::locale = Locale->new($self->{recipient_locale});
|
|
| 1281 |
|
|
| 1282 |
|
|
| 1283 |
$main::lxdebug->leave_sub(); |
|
| 1284 |
return $main::locale->text('Your Order');
|
|
| 1285 |
} |
|
| 1286 |
|
|
| 1273 | 1287 |
sub get_number_prefix_for_type {
|
| 1274 | 1288 |
$main::lxdebug->enter_sub(); |
| 1275 | 1289 |
my ($self) = @_; |
| ... | ... | |
| 1345 | 1359 |
$subject .= " " . $self->{"${prefix}number"}
|
| 1346 | 1360 |
} |
| 1347 | 1361 |
|
| 1362 |
if ($self->{cusordnumber}) {
|
|
| 1363 |
$subject = $self->get_cusordnumber_translation() . ' ' . $self->{cusordnumber} . ' / ' . $subject;
|
|
| 1364 |
} |
|
| 1365 |
|
|
| 1348 | 1366 |
$main::lxdebug->leave_sub(); |
| 1349 | 1367 |
return $subject; |
| 1350 | 1368 |
} |
Auch abrufbar als: Unified diff
E-Mail Betreff auch mit Kundenbestellnummer vorbelegen.