SL/DB/Manager/Currency.pm

   1 package SL::DB::Manager::Currency;
   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::Currency' }
  11
  12 __PACKAGE__->make_manager_methods;
  13
  14 sub _sort_spec {
  15   return ( default => [ 'id', 1 ],
  16            columns => { SIMPLE => 'ALL',
  17                         map { ( $_ => "lower(currencies.$_)" ) } qw(name)
  18                       });
  19 }
  20
  21 1;