[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

SF.net SVN: ledger-smb:[2561] trunk



Revision: 2561
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=2561&view=rev
Author:   einhverfr
Date:     2009-04-14 16:10:14 +0000 (Tue, 14 Apr 2009)

Log Message:
-----------
Correcting Maria's error on redirect
setting default on ignoring yearends to none on trial balance
Two other minor reporting fixes

Modified Paths:
--------------
    trunk/UI/rp-search.html
    trunk/bin/rp.pl
    trunk/old-handler.pl

Modified: trunk/UI/rp-search.html
===================================================================
--- trunk/UI/rp-search.html	2009-04-14 00:44:38 UTC (rev 2560)
+++ trunk/UI/rp-search.html	2009-04-14 16:10:14 UTC (rev 2561)
@@ -35,16 +35,18 @@
           </td>
         </tr>
 <?lsmb END ?>
-<?lsmb form.report == 'trial_balance' ?>
+<?lsmb IF form.report == 'trial_balance' ?>
 	<tr>
 	  <th align="right"><?lsmb text('Ignore Year-ends'); ?></th>
 	  <td><?lsmb PROCESS select element_data = {
 		options = form.yearend_options,
+		default_values = [form.ignore_yearend],
 		name = 'ignore_yearend',
 		text_attr = 'label',
 		value_attr = 'id',
               } ?></td>
 	</tr>
+<?lsmb END ?>
       </table>
     </td>
   </tr>

Modified: trunk/bin/rp.pl
===================================================================
--- trunk/bin/rp.pl	2009-04-14 00:44:38 UTC (rev 2560)
+++ trunk/bin/rp.pl	2009-04-14 16:10:14 UTC (rev 2561)
@@ -312,6 +312,7 @@
          {id => 'last', label => $locale->text('Last Only') }, 
          {id => 'none', label => $locale->text('None') }, 
     ];
+    $form->{ignore_yearend} = 'none';
 
 ##SC: Temporary commenting
 ##    if ( $form->{lynx} ) {

Modified: trunk/old-handler.pl
===================================================================
--- trunk/old-handler.pl	2009-04-14 00:44:38 UTC (rev 2560)
+++ trunk/old-handler.pl	2009-04-14 16:10:14 UTC (rev 2561)
@@ -82,7 +82,7 @@
 use DBI qw(:sql_types);
 
 # send warnings to browser
-$SIG{__WARN__} = sub { $form->info( $_[0] ) };
+# $SIG{__WARN__} = sub { $form->info( $_[0] ) };
 
 # send errors to browser
 #$SIG{__DIE__} =


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