X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/a0a30f41301f5f52c26febd9366182be858e54bb..134120bca7ac33d80c09afb5cabe25a1c1a73e8f:/SL/AP.pm

diff --git a/SL/AP.pm b/SL/AP.pm
index f5dd45ece..7b5a46150 100644
--- a/SL/AP.pm
+++ b/SL/AP.pm
@@ -475,7 +475,7 @@ sub ap_transactions {
   }
 
   my @a = qw(transdate invnumber name);
-  push @a, "employee" if $self->{l_employee};
+  push @a, "employee" if $form->{l_employee};
   my $sortdir   = !defined $form->{sortdir} ? 'ASC' : $form->{sortdir} ? 'ASC' : 'DESC';
   my $sortorder = join(', ', map { "$_ $sortdir" } @a);