From: Sven Schöling Date: Thu, 14 May 2009 11:21:09 +0000 (+0000) Subject: lower(spalte) und ähnliche ausdrücke dürfen nicht in UNIONS zum sortieren benutzt... X-Git-Tag: release-2.6.0rc1~69 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=4e953c795c21e894ffa9e72840d663bc05e01179;p=kivitendo-erp.git lower(spalte) und ähnliche ausdrücke dürfen nicht in UNIONS zum sortieren benutzt werden. Fix für Bug 981 --- diff --git a/SL/CT.pm b/SL/CT.pm index 1522e0f83..606c46a49 100644 --- a/SL/CT.pm +++ b/SL/CT.pm @@ -44,6 +44,7 @@ use SL::CVar; use SL::DBUtils; use SL::FU; use SL::Notes; +use List::MoreUtils qw(true); sub get_tuple { $main::lxdebug->enter_sub(); @@ -704,7 +705,7 @@ sub search { $form->{sort} = $sortorder; my $sortdir = !defined $form->{sortdir} ? 'ASC' : $form->{sortdir} ? 'ASC' : 'DESC'; -if ($sortorder ne 'id') { + if ($sortorder ne 'id' && 1 >= true { $form->{$_} } qw(l_ordnumber l_quonumber l_invnumber)) { $sortorder = "lower($sortorder) ${sortdir}"; } else { $sortorder .= " ${sortdir}";