Revision 4bc8abba
Von Moritz Bunkus vor mehr als 10 Jahren hinzugefügt
| SL/DB/Manager/Unit.pm | ||
|---|---|---|
|
return ("${prefix}name" => [ map { $_->name } @{ $unit->convertible_units } ]);
|
||
|
}
|
||
|
|
||
|
sub all_units {
|
||
|
my ($class) = @_;
|
||
|
$::request->cache('all_units')->{sorted} //= $class->get_all_sorted;
|
||
|
}
|
||
|
|
||
|
1;
|
||
| SL/DB/Unit.pm | ||
|---|---|---|
|
|
||
|
sub convertible_units {
|
||
|
my $self = shift;
|
||
|
my $all_units = scalar(@_) && (ref($_[0]) eq 'ARRAY') ? $_[0] : \@_;
|
||
|
$all_units = SL::DB::Manager::Unit->get_all if !@{ $all_units };
|
||
|
my $all_units = scalar(@_) && (ref($_[0]) eq 'ARRAY') ? $_[0] : [ @_ ];
|
||
|
$all_units = SL::DB::Manager::Unit->all_units if ! @{ $all_units };
|
||
|
return [
|
||
|
sort { $a->sortkey <=> $b->sortkey }
|
||
|
grep { $_->unit_class->name eq $self->unit_class->name }
|
||
Auch abrufbar als: Unified diff
SL::DB::Unit::compatible_units: alle Einheiten gecachet laden