SF.net SVN: ledger-smb:[4677] branches/1.3

[..hidden..]

Revision: 4677
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=4677&view=rev
Author:   einhverfr
Date:     2012-04-25 02:20:37 +0000 (Wed, 25 Apr 2012)
Log Message:
-----------
Correcting bug  3512591, per-currency totals not showing on aging reports

Modified Paths:
--------------
    branches/1.3/Changelog
    branches/1.3/bin/rp.pl

Modified: branches/1.3/Changelog
===================================================================
--- branches/1.3/Changelog	2012-04-25 01:41:18 UTC (rev 4676)
+++ branches/1.3/Changelog	2012-04-25 02:20:37 UTC (rev 4677)
@@ -8,6 +8,7 @@
 * Corrected untranslated string in Contact management screen (Chris T)
 * Corrected permissions issue creating pricelist (Chris T, 3513861)
 * Correcting ordering of aging reports so currencies are clustered (Chris T)
+* Fixed curr totals not showing for aging rpts (Chris T, 3512591, h/t John L)
 
 Changelog for 1.3.15
 * Update WX POS (almost there) - readme and code  (Andres B, item 3516949)

Modified: branches/1.3/bin/rp.pl
===================================================================
--- branches/1.3/bin/rp.pl	2012-04-25 01:41:18 UTC (rev 4676)
+++ branches/1.3/bin/rp.pl	2012-04-25 02:20:37 UTC (rev 4677)
@@ -1054,7 +1054,7 @@
                 $column_data{c90}   = $c90total;
                 $column_data{total} = $total;
 
-                push @{$currencies[0]{totals}}, \%column_data;
+                $currencies[0]{totals} =  \%column_data;
 
                 $c0subtotal  = 0;
                 $c30subtotal = 0;
@@ -1221,9 +1221,9 @@
     $column_data{c60}   = $c60total;
     $column_data{c90}   = $c90total;
     $column_data{total} = $total;
-    
-    $currencies[0]{total} = \%column_data;
 
+    $currencies[0]{totals} = \%column_data;
+
     $row_alignment{c0}     = 'right';
     $row_alignment{c30}    = 'right';
     $row_alignment{c60}    = 'right';
@@ -1303,6 +1303,7 @@
         path => 'UI',
         format => $format,
         );
+
     $template->render({
         form => $form,
         hiddens => \%hiddens,

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.