Revision 961d2d99
Von Moritz Bunkus vor etwa 14 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
|
}
|
||
|
|
||
|
map { $self->{"${_}"} = $myconfig->{$_}; } qw(co_ustid);
|
||
|
map { $self->{"myconfig_${_}"} = $myconfig->{$_} } grep { $_ ne 'dbpasswd' } keys %{ $myconfig };
|
||
|
|
||
|
$self->{copies} = 1 if (($self->{copies} *= 1) <= 0);
|
||
|
|
||
Auch abrufbar als: Unified diff
Alle Variablen aus %myconfig beim Drucken als "myconfig_xyz" zur Verfügung stellen