SF.net SVN: ledger-smb:[2486] trunk/scripts/recon.pl

[..hidden..]

Revision: 2486
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=2486&view=rev
Author:   einhverfr
Date:     2009-03-11 17:56:31 +0000 (Wed, 11 Mar 2009)

Log Message:
-----------
Passing manual tests now

Modified Paths:
--------------
    trunk/scripts/recon.pl

Modified: trunk/scripts/recon.pl
===================================================================
--- trunk/scripts/recon.pl	2009-03-11 17:23:56 UTC (rev 2485)
+++ trunk/scripts/recon.pl	2009-03-11 17:56:31 UTC (rev 2486)
@@ -75,6 +75,7 @@
     my ($request) = shift;
     my $recon = LedgerSMB::DBObject::Reconciliation->new(base => $request);
     $recon->add_entries($recon->import_file()) if !$recon->{submitted};
+    $recon->{their_total} = $recon->parse_amount(amount => $recon->{their_total}); 
     $recon->{dbh}->commit;
     if ($recon->{line_order}){
        $recon->set_ordering(
@@ -83,7 +84,6 @@
        );
     }
     $recon->update();
-    $recon->debug({file => '/tmp/recon'});
     _display_report($recon);
 }
 


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