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

SF.net SVN: ledger-smb:[3190] trunk/scripts/account.pl



Revision: 3190
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=3190&view=rev
Author:   einhverfr
Date:     2011-05-29 23:20:40 +0000 (Sun, 29 May 2011)

Log Message:
-----------
Erik's fix for bug 3306482

Modified Paths:
--------------
    trunk/scripts/account.pl

Modified: trunk/scripts/account.pl
===================================================================
--- trunk/scripts/account.pl	2011-05-29 23:18:36 UTC (rev 3189)
+++ trunk/scripts/account.pl	2011-05-29 23:20:40 UTC (rev 3190)
@@ -1,8 +1,12 @@
 use Template;
 use LedgerSMB::DBObject::Account;
 package LedgerSMB::Scripts::account;
+use LedgerSMB::Log;
+use Data::Dumper;
 use strict;
 
+my $logger = Log::Log4perl::get_logger("LedgerSMB::DBObject::Account");
+
 sub new {
     my ($request) = @_;
     $request->{title} = $request->{_locale}->text('Add Account');
@@ -28,7 +32,7 @@
     edit($request); 
 }
 
-sub save_new {
+sub save_as_new {
     my ($request) = @_;
     delete $request->{id};
     save($request);


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