Revision 3334532e
Von Moritz Bunkus vor etwa 7 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 partition_by);
|
|
| 7 |
use List::UtilsBy qw(partition_by); |
|
| 8 | 8 |
|
| 9 | 9 |
use constant META_CVARS => 'cvars_config'; |
| 10 | 10 |
|
| ... | ... | |
| 104 | 104 |
@$configs |
| 105 | 105 |
); |
| 106 | 106 |
|
| 107 |
@return = sort_by { $_->config->sortkey } @return;
|
|
| 108 |
|
|
| 109 | 107 |
return \@return; |
| 110 | 108 |
} |
| 111 | 109 |
} |
Auch abrufbar als: Unified diff
Revert "CVar-Helfer: cvars_by_config nach Config-Reihenfolge sortiert zurückgeben"
This reverts commit 6e1a7a2e06de426b553ada3aed39f28b4825d0ce.
Die Funktion `_all_configs` liefert die Konfigurationen bereits
sortiert. Schlimmer ist, dass `sort_by` nicht numerisch sondern
alphabetisch sortiert, sodass `sortkey = 10` vor `sortkey = 2` kommt.