Revision e0b53158
Von Werner Hahn vor mehr als 2 Jahren hinzugefügt
| SL/Presenter/Tag.pm | ||
|---|---|---|
|
} elsif (ref($default_coll) eq 'HASH') {
|
||
|
%selected = %{ $default_coll };
|
||
|
|
||
|
} elsif ($default_coll) {
|
||
|
$default_coll = [ $default_coll ] unless 'ARRAY' eq ref $default_coll;
|
||
|
|
||
|
%selected = $default_val_key ? map({ ($normalize_entry->('value', $_, undef, $default_val_key) => 1) } @{ $default_coll })
|
||
|
: map({ ($_ => 1) } @{ $default_coll });
|
||
| ... | ... | |
|
|
||
|
The following are used directly from each level:
|
||
|
|
||
|
=over 12
|
||
|
=over 4
|
||
|
|
||
|
=item I<name> is deleted from level attributes.
|
||
|
The I<name> is used for the for the name of the 'select' tag.
|
||
| ... | ... | |
|
|
||
|
=item I<default> is used to find the default level object.
|
||
|
|
||
|
=tiem I<default_key> names the key for the default feld of level object. Is
|
||
|
=item I<default_key> names the key for the default feld of level object. Is
|
||
|
ignored if I<default> is set.
|
||
|
|
||
|
=back
|
||
|
|
||
|
|
||
|
<\@collection> is used for the level object of level 1. The objects of the next
|
||
|
=item I<\@collection> is used for the level object of level 1. The objects of the next
|
||
|
level are taken from the previous level via the <object_key>. On each level the
|
||
|
objects must be a hash reference or a blessed reference.
|
||
|
|
||
Auch abrufbar als: Unified diff
POD Syntax