diff options
| -rw-r--r-- | LedgerSMB/DBObject/Company.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/LedgerSMB/DBObject/Company.pm b/LedgerSMB/DBObject/Company.pm index 9b122b4d..b2584aa0 100644 --- a/LedgerSMB/DBObject/Company.pm +++ b/LedgerSMB/DBObject/Company.pm @@ -69,7 +69,7 @@ This method saves an address for a company. sub save_location { my $self = shift @_; - $self->{country_id} = $self->{country}; + $self->{country_id} = $self->{country_code}; $self->exec_method(funcname => 'company__location_save'); $self->{dbh}->commit; |