Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 09221829

Von Sven Schöling vor fast 16 Jahren hinzugefügt

  • ID 09221829d6900f1e502a2abadec5e88b7618a186
  • Vorgänger 8f8ad003
  • Nachfolger 9d2ac13b

List::MoreUtils durch einen einfachen ausdruck ersetzt.

Fix für den aufgemachten Bug 906.

Unterschiede anzeigen:

SL/CT.pm
use SL::DBUtils;
use SL::FU;
use SL::Notes;
use List::MoreUtils qw(true);
sub get_tuple {
$main::lxdebug->enter_sub();
......
$form->{sort} = $sortorder;
my $sortdir = !defined $form->{sortdir} ? 'ASC' : $form->{sortdir} ? 'ASC' : 'DESC';
if ($sortorder ne 'id' && 1 >= true { $form->{$_} } qw(l_ordnumber l_quonumber l_invnumber)) {
if ($sortorder ne 'id' && 1 >= scalar grep { $form->{$_} } qw(l_ordnumber l_quonumber l_invnumber)) {
$sortorder = "lower($sortorder) ${sortdir}";
} else {
$sortorder .= " ${sortdir}";

Auch abrufbar als: Unified diff