diff options
author | Craig Earls <enderw88@gmail.com> | 2013-02-19 16:45:25 -0700 |
---|---|---|
committer | Craig Earls <enderw88@gmail.com> | 2013-02-19 16:45:25 -0700 |
commit | f33d232ba34e46e17a39e08ee2f2ad78b5aafb1a (patch) | |
tree | 3f44e58b7dbe4bd4b8a7e448002487140c455b91 /contrib/non-profit-audit-reports/general-ledger-report.plx | |
parent | 4ebd17efb391b5236c69f5d7eb3b5852a962fe58 (diff) | |
parent | f8bec00d0b7487c4afe56a4f994e69ec8e91af8b (diff) | |
download | fork-ledger-f33d232ba34e46e17a39e08ee2f2ad78b5aafb1a.tar.gz fork-ledger-f33d232ba34e46e17a39e08ee2f2ad78b5aafb1a.tar.bz2 fork-ledger-f33d232ba34e46e17a39e08ee2f2ad78b5aafb1a.zip |
Merge commit 'f8bec00d0b7487c4afe56a4f994e69ec8e91af8b' into next
Diffstat (limited to 'contrib/non-profit-audit-reports/general-ledger-report.plx')
-rwxr-xr-x | contrib/non-profit-audit-reports/general-ledger-report.plx | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/non-profit-audit-reports/general-ledger-report.plx b/contrib/non-profit-audit-reports/general-ledger-report.plx index 1e6d9caf..dce855b4 100755 --- a/contrib/non-profit-audit-reports/general-ledger-report.plx +++ b/contrib/non-profit-audit-reports/general-ledger-report.plx @@ -72,6 +72,7 @@ my @accounts; while (my $line = <CHART_DATA>) { chomp $line; next if $line =~ /^\s*\<\s*Adjustment\s*\>\s*$/; + next if $line =~ /^\s*Equity:/; # Stupid auto-account made by ledger. $line =~ s/^\s*//; $line =~ s/\s*$//; push(@accounts, $line); @@ -119,7 +120,6 @@ sub preferredAccountSorting ($$) { } } - my @sortedAccounts; foreach my $acct ( sort preferredAccountSorting @accounts) { print CHART_OUTPUT "\"$acct\"\n"; |