diff options
| author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-12-05 18:47:52 +0000 |
|---|---|---|
| committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-12-05 18:47:52 +0000 |
| commit | fe154e86fb78b784fe78a4897e3372cbbe9e77f9 (patch) | |
| tree | 98f2fb84ed5d6067e2c8bc48e6560919f11ba525 /LedgerSMB/CA.pm | |
| parent | 60ef7ef2016499372d3fbc45ad7f2433d83fc63e (diff) | |
Fixing error in account transaction report
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1946 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB/CA.pm')
| -rw-r--r-- | LedgerSMB/CA.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/LedgerSMB/CA.pm b/LedgerSMB/CA.pm index 6adaf302..389550ae 100644 --- a/LedgerSMB/CA.pm +++ b/LedgerSMB/CA.pm @@ -138,10 +138,10 @@ sub all_transactions { my $fromdate_where; my $todate_where; - + ( $form->{fromdate}, $form->{todate} ) = $form->from_to( $form->{year}, $form->{month}, $form->{interval} ) - if $form->{year} && $form->{month}; + if !$form->{fromdate} && !$form->{todate}; my $fdate; if ( $form->{fromdate} ) { |