SF.net SVN: ledger-smb:[3237] trunk/LedgerSMB/ScriptLib/Company.pm

[..hidden..]

Revision: 3237
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=3237&view=rev
Author:   ehuelsmann
Date:     2011-06-13 14:31:50 +0000 (Mon, 13 Jun 2011)

Log Message:
-----------
Create the right type of company when editing.

 * LedgerSMB/ScriptLib/Company.pm
   (edit): Instead of creating (hard coded) a vendor,
     use the appropriate allocation function (which also might
     return a customer).

Modified Paths:
--------------
    trunk/LedgerSMB/ScriptLib/Company.pm

Modified: trunk/LedgerSMB/ScriptLib/Company.pm
===================================================================
--- trunk/LedgerSMB/ScriptLib/Company.pm	2011-06-13 13:35:18 UTC (rev 3236)
+++ trunk/LedgerSMB/ScriptLib/Company.pm	2011-06-13 14:31:50 UTC (rev 3237)
@@ -497,7 +497,7 @@
 
 sub edit{
     my $request = shift @_;
-    my $company = LedgerSMB::DBObject::Vendor->new({base => $request});
+    my $company = new_company($request);
 
     $company->get();
     _render_main_screen($company);


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