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

[..hidden..]

Revision: 4903
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=4903&view=rev
Author:   einhverfr
Date:     2012-06-17 09:04:13 +0000 (Sun, 17 Jun 2012)
Log Message:
-----------
Major Bugfix:  Fixed voided invoice doubling payments

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

Modified: branches/1.3/Changelog
===================================================================
--- branches/1.3/Changelog	2012-06-16 12:52:03 UTC (rev 4902)
+++ branches/1.3/Changelog	2012-06-17 09:04:13 UTC (rev 4903)
@@ -16,6 +16,7 @@
 * Fixed discarded input/bad label on 1.2 upgrade screen (Chris T, h/t Robert C)
 * Fixed encoding of attachment retrieval (Chris T h/t Erik H)
 * Fixed missing grant on partsvendor_entry_id_seq (Chris T, h/t Brian W)
+* Fixed voiding invoice duplicates payment (Chris T h/t John L)
 
 Changelog for 1.3.18
 * Fixed missing template for CSV pricelists (Chris T)

Modified: branches/1.3/bin/is.pl
===================================================================
--- branches/1.3/bin/is.pl	2012-06-16 12:52:03 UTC (rev 4902)
+++ branches/1.3/bin/is.pl	2012-06-17 09:04:13 UTC (rev 4903)
@@ -600,6 +600,13 @@
     }
     $form->{invnumber} .= '-VOID';
     $form->{reverse} = 1;
+    $form->{paidaccounts} = 1;
+    if ($form->{paid_1}){
+        warn $locale->text(
+             'Payments associated with voided invoice may need to be reversed.'
+        );
+        delete $form->{paid_1};
+    }
     &post_as_new;
 }
 

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