From 0542de9da74c701979c5a70be3652aaab0245a4b Mon Sep 17 00:00:00 2001
From: "Bradley M. Kuhn" <bkuhn@ebb.org>
Date: Fri, 2 Dec 2011 07:30:04 -0500
Subject: [PATCH] Chart of accounts should have an end date, but not a
 beginning date.

---
 general-ledger-report.plx | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/general-ledger-report.plx b/general-ledger-report.plx
index d743fd7..3737c4d 100755
--- a/general-ledger-report.plx
+++ b/general-ledger-report.plx
@@ -46,7 +46,7 @@ if (@ARGV < 2) {
 my($beginDate, $endDate, @otherLedgerOpts) = @ARGV;
 
 my(@chartOfAccountsOpts) = ('--wide-register-format', "%150A\n",  '-w', '-s',
-                            '-b', $beginDate, @otherLedgerOpts, 'reg');
+                            '-e', $endDate, @otherLedgerOpts, 'reg');
 
 open(CHART_DATA, "-|", $LEDGER_CMD, @chartOfAccountsOpts)
   or die "Unable to run $LEDGER_CMD @chartOfAccountsOpts: $!";
@@ -80,7 +80,6 @@ foreach my $acct (
   push(@sortedAccounts, $acct);
 }
 close(CHART_OUTPUT); die "error writing to chart-of-accounts.txt: $!" unless $? == 0;
-
 ###############################################################################
 #
 # Local variables: