SF.net SVN: ledger-smb:[2710] trunk/LedgerSMB/DBObject/Company.pm

[..hidden..]

Revision: 2710
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=2710&view=rev
Author:   einhverfr
Date:     2009-06-29 16:52:55 +0000 (Mon, 29 Jun 2009)

Log Message:
-----------
Correcting location selection bug

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

Modified: trunk/LedgerSMB/DBObject/Company.pm
===================================================================
--- trunk/LedgerSMB/DBObject/Company.pm	2009-06-29 02:18:24 UTC (rev 2709)
+++ trunk/LedgerSMB/DBObject/Company.pm	2009-06-29 16:52:55 UTC (rev 2710)
@@ -272,7 +272,7 @@
 
     if ($self->{location_id}){
         for (@{$self->{locations}}){
-            if ($_->{id} = $self->{location_id}){
+            if ($_->{id} == $self->{location_id}){
                 my $old_id = $self->{id};
                 $self->merge($_);
                 for my $c (@{$self->{country_list}}){
@@ -280,7 +280,6 @@
                          $self->{country_code} = $c->{id};
                      }
                 }
-                $self->{id} = $old_id;
                 last;
             }
         }


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