X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDB%2FRequirementSpecPredefinedText.pm;h=c2ab0c87cb5e491f96af9128a727184bd3d46732;hb=83a78eea7bb24102f0b255bd350b7dd343e7a8e4;hp=9faddcd1e684b33575fec33e7eeba895944dbddb;hpb=d17e1b9d1b761bb19d0cb79a742ea70a07028998;p=kivitendo-erp.git diff --git a/SL/DB/RequirementSpecPredefinedText.pm b/SL/DB/RequirementSpecPredefinedText.pm index 9faddcd1e..c2ab0c87c 100644 --- a/SL/DB/RequirementSpecPredefinedText.pm +++ b/SL/DB/RequirementSpecPredefinedText.pm @@ -3,18 +3,22 @@ package SL::DB::RequirementSpecPredefinedText; 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; -# Creates get_all, get_all_count, get_all_iterator, delete_all and update_all. -__PACKAGE__->meta->make_manager_class; +__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; }