Revision 893ae739
Von Sven Schöling vor fast 11 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 1032 | 1032 |
$self->{"myconfig_${_}"} = $myconfig->{$_} for grep { $_ ne 'dbpasswd' } keys %{ $myconfig };
|
| 1033 | 1033 |
$self->{$_} = $defaults->$_ for qw(co_ustid);
|
| 1034 | 1034 |
$self->{"myconfig_${_}"} = $defaults->$_ for qw(address businessnumber co_ustid company duns sepa_creditor_id taxnumber);
|
| 1035 |
$self->{AUTH} = $::auth;
|
|
| 1036 |
$self->{INSTANCE_CONF} = $::instance_conf;
|
|
| 1037 |
$self->{LOCALE} = $::locale;
|
|
| 1038 |
$self->{LXCONFIG} = $::lx_office_conf;
|
|
| 1039 |
$self->{LXDEBUG} = $::lxdebug;
|
|
| 1040 |
$self->{MYCONFIG} = \%::myconfig;
|
|
| 1035 | 1041 |
|
| 1036 | 1042 |
$self->{copies} = 1 if (($self->{copies} *= 1) <= 0);
|
| 1037 | 1043 |
|
Auch abrufbar als: Unified diff
Globale Objekte auch ans Printsystem übergeben
Fix für #2382