SF.net SVN: ledger-smb:[3700] trunk/bin/rp.pl

[..hidden..]

Revision: 3700
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=3700&view=rev
Author:   einhverfr
Date:     2011-09-15 23:43:59 +0000 (Thu, 15 Sep 2011)
Log Message:
-----------
Attempt 1 to correct emailing of statements

Modified Paths:
--------------
    trunk/bin/rp.pl

Modified: trunk/bin/rp.pl
===================================================================
--- trunk/bin/rp.pl	2011-09-15 22:50:16 UTC (rev 3699)
+++ trunk/bin/rp.pl	2011-09-15 23:43:59 UTC (rev 3700)
@@ -1378,7 +1378,7 @@
     my %hiddens;
     # get name and email addresses
     for $i ( 1 .. $form->{rowcount} ) {
-        if ( $form->{"statement_$i"} eq '1' ) {
+        if ( $form->{"statement_$i"} ) {
             $form->{"$form->{ct}_id"}  = $form->{"$form->{ct}_id_$i"};
             $form->{"statement_1"}     = 1;
             $form->{"language_code_1"} = $form->{"language_code_$i"};

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