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

[..hidden..]

Revision: 6955
          http://sourceforge.net/p/ledger-smb/code/6955
Author:   einhverfr
Date:     2014-03-28 09:52:58 +0000 (Fri, 28 Mar 2014)
Log Message:
-----------
1.3-only fix for 1097, to be included in 1.3.39-rc3

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

Modified: branches/1.3/Changelog
===================================================================
--- branches/1.3/Changelog	2014-03-28 04:07:12 UTC (rev 6954)
+++ branches/1.3/Changelog	2014-03-28 09:52:58 UTC (rev 6955)
@@ -13,6 +13,7 @@
 * Fixed error that string cannot be used as array during payment (Chris T)
 * Fixed POD syntax errors in five LedgerSMB/* files. (Robert C)
 * Fixed upgrade tests where null pricegrup exists (Chris T)
+* Fixed save button on ar/ap transactions not saving (Chris T, 1097)
 
 Changelog for 1.3.38
 * Fixed AR/AP transactions resetting currency/exchange rate (Chris T)

Modified: branches/1.3/bin/aa.pl
===================================================================
--- branches/1.3/bin/aa.pl	2014-03-28 04:07:12 UTC (rev 6954)
+++ branches/1.3/bin/aa.pl	2014-03-28 09:52:58 UTC (rev 6955)
@@ -1362,8 +1362,9 @@
     }
 
     # if oldname ne name redo form
-    ($name) = split /--/, $form->{ $form->{vc} };
-    if ( $form->{"old$form->{vc}"} ne qq|$name--$form->{"$form->{vc}_id"}| ) {
+    ($name, $id) = split /--/, $form->{ $form->{vc} };
+    if (( $form->{"old$form->{vc}"} ne qq|$name--$form->{"$form->{vc}_id"}|) 
+        and ($form->{"old$form->{vc}"} !~ /$name--$id--/ )) {
         &update;
         $form->finalize_request();
     }

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


------------------------------------------------------------------------------
_______________________________________________
Ledger-smb-commits mailing list
..hidden..
https://lists.sourceforge.net/lists/listinfo/ledger-smb-commits