bitlair/revbank
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

grandtotal: skip hidden accounts

Browse source
This commit is contained in:
Juerd Waalboer 2022-06-11 19:27:51 +02:00
parent 441bf05fde
commit 9b302372f3
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
plugins/grandtotal
View file

@ -10,7 +10,10 @@ sub command :Tab(grandtotal) ($self, $cart, $command, @) {
open my $fh, "<", "revbank.accounts"; open my $fh, "<", "revbank.accounts";
while (defined(my $line = readline $fh)) { while (defined(my $line = readline $fh)) {
my $credit = (split " ", $line)[1]; my ($username, $balance) = split " ", $line;
next if RevBank::Users::is_hidden($username);
my $credit = $balance;
$neg += $credit if $credit < 0; $neg += $credit if $credit < 0;
$pos += $credit if $credit > 0; $pos += $credit if $credit > 0;
} }