SL/DB/Manager/RequirementSpecTextBlock.pm

   1 package SL::DB::Manager::RequirementSpecTextBlock;
   2
   3 use strict;
   4
   5 use SL::DB::Helper::Manager;
   6 use base qw(SL::DB::Helper::Manager);
   7
   8 use SL::DB::Helper::Sorted;
   9
  10 sub object_class { 'SL::DB::RequirementSpecTextBlock' }
  11
  12 __PACKAGE__->make_manager_methods;
  13
  14 sub _sort_spec {
  15   return (
  16     default => [ 'position', 1 ],
  17     columns => {
  18       SIMPLE => 'ALL',
  19       map { ( $_ => "lower(requirement_spec_text_blocks.${_})" ) } qw(title text),
  20     });
  21 }
  22
  23 1;