projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
lower(spalte) und ähnliche ausdrücke dürfen nicht in UNIONS zum sortieren benutzt...
[kivitendo-erp.git]
/
SL
/
CT.pm
diff --git
a/SL/CT.pm
b/SL/CT.pm
index
1522e0f
..
606c46a
100644
(file)
--- 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 SL::DBUtils;
use SL::FU;
use SL::Notes;
+use List::MoreUtils qw(true);
sub get_tuple {
$main::lxdebug->enter_sub();
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';
$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}";
$sortorder = "lower($sortorder) ${sortdir}";
} else {
$sortorder .= " ${sortdir}";