Revision b4baa620
Von Cem Aydin vor 2 Monaten hinzugefügt
| SL/DB/Helper/LegacyPrinting.pm | ||
|---|---|---|
| 15 | 15 |
$template_arrays->{$k1} = [ map { { $k2 => $_->{$k1}->{$k2} } } @$items ];
|
| 16 | 16 |
} else {
|
| 17 | 17 |
$template_arrays->{$key} = [ map {
|
| 18 |
$_->can($key) ? $_->$key |
|
| 19 |
: $_->{$key}
|
|
| 18 |
if (ref $_ eq 'HASH') {
|
|
| 19 |
$_->{$key}
|
|
| 20 |
} else {
|
|
| 21 |
$_->can($key) ? $_->$key |
|
| 22 |
: $_->{$key}
|
|
| 23 |
} |
|
| 20 | 24 |
} @$items ]; |
| 21 | 25 |
} |
| 22 | 26 |
} |
Auch abrufbar als: Unified diff
Helper LegacyPrinting: prüfen ob Element hash oder objekt ist