SL/DB/RequirementSpecTextBlock.pm

   1 package SL::DB::RequirementSpecTextBlock;
   2
   3 use strict;
   4
   5 use SL::DB::MetaSetup::RequirementSpecTextBlock;
   6 use SL::DB::Manager::RequirementSpecTextBlock;
   7 use SL::DB::Helper::ActsAsList;
   8 use SL::Locale::String;
   9
  10 __PACKAGE__->meta->initialize;
  11
  12 __PACKAGE__->configure_acts_as_list(group_by => [qw(requirement_spec_id output_position)]);
  13
  14 sub validate {
  15   my ($self) = @_;
  16
  17   my @errors;
  18   push @errors, t8('The title is missing.') if !$self->title;
  19
  20   return @errors;
  21 }
  22
  23 1;