Revision 3c559a20
Von Moritz Bunkus vor mehr als 18 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
|
|
||
|
map({ $self->{"employee_${_}"} = $myconfig->{$_}; }
|
||
|
qw(email tel fax name signature company address businessnumber));
|
||
|
map({ $self->{"employee_${_}"} =~ s/\\n/\n/g; }
|
||
|
qw(company address signature));
|
||
|
|
||
|
$self->{copies} = 1 if (($self->{copies} *= 1) <= 0);
|
||
|
|
||
| bin/mozilla/io.pl | ||
|---|---|---|
|
|
||
|
$form->{notes} =~ s/^\s+//g;
|
||
|
|
||
|
map({ $form->{$_} =~ s/\\n/\n/g; } qw(company address));
|
||
|
|
||
|
$form->{templates} = "$myconfig{templates}";
|
||
|
|
||
|
$form->{language} = $form->get_template_language(\%myconfig);
|
||
Auch abrufbar als: Unified diff
Einige Variablen wurden umbenannt und müssen auch an anderer Stelle behandelt werden.