summaryrefslogtreecommitdiff
path: root/LedgerSMB/DBObject
diff options
context:
space:
mode:
Diffstat (limited to 'LedgerSMB/DBObject')
-rw-r--r--LedgerSMB/DBObject/Company.pm10
-rw-r--r--LedgerSMB/DBObject/Menu.pm1
2 files changed, 10 insertions, 1 deletions
diff --git a/LedgerSMB/DBObject/Company.pm b/LedgerSMB/DBObject/Company.pm
index ed94b015..08e0ebc8 100644
--- a/LedgerSMB/DBObject/Company.pm
+++ b/LedgerSMB/DBObject/Company.pm
@@ -33,6 +33,9 @@ sub get_metadata {
@{$self->{location_class_list}} =
$self->exec_method(funcname => 'location_list_class');
+ @{$self->{business_types}} =
+ $self->exec_method(funcname => 'business_type__list');
+
@{$self->{country_list}} =
$self->exec_method(funcname => 'location_list_country');
@@ -58,6 +61,13 @@ sub save_notes {
$self->{dbh}->commit;
}
+sub search {
+ my ($self) = @_;
+ @{$self->{search_results}} =
+ $self->exec_method(funcname => 'company__search');
+ return @{$self->{search_results}};
+}
+
sub get {
my $self = shift @_;
diff --git a/LedgerSMB/DBObject/Menu.pm b/LedgerSMB/DBObject/Menu.pm
index ca3fae39..62de68ba 100644
--- a/LedgerSMB/DBObject/Menu.pm
+++ b/LedgerSMB/DBObject/Menu.pm
@@ -71,7 +71,6 @@ sub generate_section {
sub __generate {
my ($self) = @_;
- $self->debug({file => '/tmp/menu'});
my @args;
shift @{$self->{menu_items}};