Ignore <Adjustments> accounts.
This commit is contained in:
parent
586c4eb3b3
commit
3e634b6d45
1 changed files with 1 additions and 0 deletions
|
|
@ -57,6 +57,7 @@ open(CHART_DATA, "-|", $LEDGER_CMD, @chartOfAccountsOpts)
|
|||
my @accounts;
|
||||
while (my $line = <CHART_DATA>) {
|
||||
chomp $line;
|
||||
next if $line =~ /^\s*\<\s*Adjustment\s*\>\s*$/;
|
||||
$line =~ s/^\s*//; $line =~ s/\s*$//;
|
||||
push(@accounts, $line);
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue