X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDB%2FRequirementSpecPredefinedText.pm;h=c2ab0c87cb5e491f96af9128a727184bd3d46732;hb=0f521b3d8ea765b3e39f2f817e5f4f97a23d562c;hp=a63a903c8e25e087a34f9e013198d26c0ebbcd4a;hpb=baac72df4777f1d63da63867e893c302b5c0bf5a;p=kivitendo-erp.git diff --git a/SL/DB/RequirementSpecPredefinedText.pm b/SL/DB/RequirementSpecPredefinedText.pm index a63a903c8..c2ab0c87c 100644 --- a/SL/DB/RequirementSpecPredefinedText.pm +++ b/SL/DB/RequirementSpecPredefinedText.pm @@ -5,14 +5,20 @@ use strict; use SL::DB::MetaSetup::RequirementSpecPredefinedText; use SL::DB::Manager::RequirementSpecPredefinedText; use SL::DB::Helper::ActsAsList; +use SL::DB::Helper::AttrHTML; use SL::Locale::String; +__PACKAGE__->meta->initialize; + +__PACKAGE__->attr_html('text'); + sub validate { my ($self) = @_; my @errors; - push @errors, t8('The title is missing.') if !$self->title; - push @errors, t8('The description is missing.') if !$self->description; + push @errors, t8('The description is missing.') if !$self->description; + push @errors, t8('The description is not unique.') if $self->get_first_conflicting('description'); + push @errors, t8('The title is missing.') if !$self->title; return @errors; }