Kunden-/Lieferantenbericht: auch im Nicht-Union-Fall nach Typ sortieren können.

[mfinanz.git] / SL / DB / Manager / Employee.pm

diff --git a/SL/DB/Manager/Employee.pm b/SL/DB/Manager/Employee.pm
index b4ebf14449ed6d881443e88641707b852ea07398..410a04af38b0994623ae8ed171dd623edf2c160f 100644 (file)
--- a/SL/DB/Manager/Employee.pm
+++ b/SL/DB/Manager/Employee.pm
@@ -3,12 +3,23 @@ package SL::DB::Manager::Employee;
 use strict;
 
 use SL::DB::Helper::Manager;
+use SL::DB::Helper::Sorted;
 use base qw(SL::DB::Helper::Manager);
 
 sub object_class { 'SL::DB::Employee' }
 
 __PACKAGE__->make_manager_methods;
 
+sub _sort_spec {
+  (
+    default  => [ 'name', 1 ],
+    columns  => {
+      SIMPLE => 'ALL',
+      map { +($_ => "lower(employee.$_)") } qw(deleted_email deleted_fax deleted_signature deleted_tel login name)
+    },
+  );
+}
+
 sub current {
   return undef unless $::form && $::form->{login};
   return shift->find_by(login => $::form->{login});
@@ -26,7 +37,6 @@ sub update_entries_for_authorized_users {
 
     $employee->update_attributes(
       name      => $user_config->{name},
-      workphone => $user_config->{tel},
       deleted   => 0,
     );
   }