Revision 6e1a7a2e
Von Moritz Bunkus vor etwa 8 Jahren hinzugefügt
| SL/DB/Helper/CustomVariables.pm | ||
|---|---|---|
| 4 | 4 |
use Carp; |
| 5 | 5 |
use Data::Dumper; |
| 6 | 6 |
use List::Util qw(first); |
| 7 |
use List::UtilsBy qw(sort_by); |
|
| 7 | 8 |
|
| 8 | 9 |
use constant META_CVARS => 'cvars_config'; |
| 9 | 10 |
|
| ... | ... | |
| 98 | 99 |
@$configs |
| 99 | 100 |
); |
| 100 | 101 |
|
| 102 |
@return = sort_by { $_->config->sortkey } @return;
|
|
| 103 |
|
|
| 101 | 104 |
return \@return; |
| 102 | 105 |
} |
| 103 | 106 |
} |
Auch abrufbar als: Unified diff
CVar-Helfer: cvars_by_config nach Config-Reihenfolge sortiert zurückgeben