SF.net SVN: ledger-smb:[3397] trunk/bin/am.pl

[..hidden..]

Revision: 3397
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=3397&view=rev
Author:   einhverfr
Date:     2011-07-01 08:12:56 +0000 (Fri, 01 Jul 2011)

Log Message:
-----------
Correcting 3344907

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

Modified: trunk/bin/am.pl
===================================================================
--- trunk/bin/am.pl	2011-07-01 07:37:27 UTC (rev 3396)
+++ trunk/bin/am.pl	2011-07-01 08:12:56 UTC (rev 3397)
@@ -72,7 +72,7 @@
      label => $locale->text('Default Email From') },
 );
 
-my @default_others = qq(businessnumber weightunit 
+my @default_others = qw(businessnumber weightunit 
                         IC IC_income IC_expense 
                         FX_gain FX_loss default_country templates curr);
 
@@ -1729,7 +1729,6 @@
        push @defaults, $_->{name};
     } 
     push @defaults, @default_others;
-    push @defaults;
     if ( AM->save_defaults( \%myconfig, $form, ..hidden..) ) {
         $form->redirect( $locale->text('Defaults saved!') );
     }


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