X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDB%2FRequirementSpecItem.pm;h=8f7874da4627ad3c386764c4d9818d33ef11f842;hb=e86e30de944c4bbe4b42f43d933e0a28a83408dd;hp=f7444dababaa7ad092f47fae03c5bae68db23d4d;hpb=3250f2ee17441742890fe97b4fe5851626029441;p=kivitendo-erp.git

diff --git a/SL/DB/RequirementSpecItem.pm b/SL/DB/RequirementSpecItem.pm
index f7444daba..8f7874da4 100644
--- a/SL/DB/RequirementSpecItem.pm
+++ b/SL/DB/RequirementSpecItem.pm
@@ -5,6 +5,7 @@ use strict;
 use SL::DB::MetaSetup::RequirementSpecItem;
 use SL::DB::Manager::RequirementSpecItem;
 use SL::DB::Helper::ActsAsList;
+use SL::DB::Helper::AttrDuration;
 
 __PACKAGE__->meta->add_relationship(
   children     => {
@@ -29,6 +30,7 @@ __PACKAGE__->meta->add_relationship(
 __PACKAGE__->meta->initialize;
 
 __PACKAGE__->configure_acts_as_list(group_by => [qw(requirement_spec_id parent_id)]);
+__PACKAGE__->attr_duration(qw(time_estimation));
 
 __PACKAGE__->before_delete(\&_before_delete_delete_children);
 
@@ -43,6 +45,15 @@ sub _before_delete_delete_children {
   1;
 }
 
+sub validate {
+  my ($self) = @_;
+
+  my @errors;
+  push @errors, t8('The title is missing.') if !$self->parent_id && !$self->title;
+
+  return @errors;
+}
+
 sub sorted_children {
   my ($self) = @_;