SL/DB/RequirementSpecTextBlock.pm

   1 package SL::DB::RequirementSpecTextBlock;
   2
   3 use strict;
   4
   5 use SL::DB::MetaSetup::RequirementSpecTextBlock;
   6 # ActsAsList does not support position arguments grouped by other
   7 # columns, e.g. by the requirement_spec_id in this case. So we cannot
   8 # use it yet.
   9 # use SL::DB::Helper::ActsAsList;
  10 use SL::Locale::String;
  11
  12 # Creates get_all, get_all_count, get_all_iterator, delete_all and update_all.
  13 __PACKAGE__->meta->make_manager_class;
  14
  15 sub validate {
  16   my ($self) = @_;
  17
  18   my @errors;
  19   push @errors, t8('The title is missing.') if !$self->title;
  20
  21   return @errors;
  22 }
  23
  24 1;