Revision a27dd3ae
Von Sven Schöling vor mehr als 13 Jahren hinzugefügt
| SL/DB/Helper/Manager.pm | ||
|---|---|---|
|
return $class->get_all(query => [ @_ ], limit => 1)->[0];
|
||
|
}
|
||
|
|
||
|
sub find_by_or_create {
|
||
|
my $class = shift;
|
||
|
|
||
|
my $found;
|
||
|
eval { $found = $class->find_by(@_); };
|
||
|
return defined $found ? $found : $class->object_class->new;
|
||
|
}
|
||
|
|
||
|
sub get_first {
|
||
|
shift->get_all(
|
||
|
@_,
|
||
Auch abrufbar als: Unified diff
Manager: find_by_or_create, sichere Variante ein Objekt zu finden oder zu autovivifien.