Correct variable names
This commit is contained in:
parent
4e52c8fe1c
commit
7b5f6f1b8a
1 changed files with 1 additions and 1 deletions
|
@ -70,7 +70,7 @@ sub sortFunction($$) {
|
||||||
my $ledgerEntityId1 = $sp->getLedgerEntityId($_[1]);
|
my $ledgerEntityId1 = $sp->getLedgerEntityId($_[1]);
|
||||||
my $type0 = $sp->{ledgerData}{$ledgerEntityId0}{__TYPE__};
|
my $type0 = $sp->{ledgerData}{$ledgerEntityId0}{__TYPE__};
|
||||||
my $type1 = $sp->{ledgerData}{$ledgerEntityId1}{__TYPE__};
|
my $type1 = $sp->{ledgerData}{$ledgerEntityId1}{__TYPE__};
|
||||||
if ( (defined $type0 and $type =~ /month/i) or (defined $type1 and $type =~ /month/i)) {
|
if ( (defined $type0 and $type0 =~ /month/i) or (defined $type1 and $type1 =~ /month/i)) {
|
||||||
return ($_[0] <=> $_[1]);
|
return ($_[0] <=> $_[1]);
|
||||||
} else {
|
} else {
|
||||||
return ($lastGaveDate0 cmp $lastGaveDate1);
|
return ($lastGaveDate0 cmp $lastGaveDate1);
|
||||||
|
|
Loading…
Reference in a new issue