X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FAR.pm;h=f828270dff13cca9be3d211ef271faed61e0106f;hb=f12fcb594dd079ca987edca36cd431a3a2ef155e;hp=45c445396cd33a8f8b0f4601910c6e0d29243f10;hpb=4159233152d5e20dfb0e7ea67c9b5b2a45e45f68;p=kivitendo-erp.git

diff --git a/SL/AR.pm b/SL/AR.pm
index 45c445396..f828270df 100644
--- a/SL/AR.pm
+++ b/SL/AR.pm
@@ -605,7 +605,12 @@ sub ar_transactions {
   my @a = (transdate, invnumber, name);
   push @a, "employee" if $form->{l_employee};
   my $sortorder = join(', ', @a);
-  $sortorder = $form->{sort} if ($form->{sort} && grep({ $_ eq $form->{sort} } @a));
+
+  if (grep({ $_ eq $form->{sort} }
+           qw(id transdate duedate invnumber ordnumber name
+              datepaid employee shippingpoint shipvia))) {
+    $sortorder = $form->{sort};
+  }
 
   $query .= " WHERE $where ORDER by $sortorder";