--- /dev/null
+package SL::DB::Manager::RequirementSpecTextBlock;
+
+use strict;
+
+use SL::DB::Helper::Manager;
+use base qw(SL::DB::Helper::Manager);
+
+use SL::DB::Helper::Sorted;
+
+sub object_class { 'SL::DB::RequirementSpecTextBlock' }
+
+__PACKAGE__->make_manager_methods;
+
+sub _sort_spec {
+ return (
+ default => [ 'position', 1 ],
+ columns => {
+ SIMPLE => 'ALL',
+ map { ( $_ => "lower(requirement_spec_text_blocks.${_})" ) } qw(title text),
+ });
+}
+
+1;