X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FController%2FTopQuickSearch.pm;h=03d6504438a8534d761d835a603b460de8e5021a;hb=d4c5ff04f33e7fe29e079c4489c4126a7ea2493c;hp=978eb95db1c3f90a5301a777e07a126db32ad598;hpb=92879200ffaa0361108cea1cb69b86db3f10e90b;p=kivitendo-erp.git diff --git a/SL/Controller/TopQuickSearch.pm b/SL/Controller/TopQuickSearch.pm index 978eb95db..03d650443 100644 --- a/SL/Controller/TopQuickSearch.pm +++ b/SL/Controller/TopQuickSearch.pm @@ -6,6 +6,7 @@ use parent qw(SL::Controller::Base); use SL::ClientJS; use SL::JSON; use SL::Locale::String qw(t8); +use SL::Helper::UserPreferences; use Rose::Object::MakeMethods::Generic ( 'scalar --get_set_init' => [ qw(module js) ], @@ -16,8 +17,17 @@ my @available_modules = ( 'SL::Controller::TopQuickSearch::Part', 'SL::Controller::TopQuickSearch::Service', 'SL::Controller::TopQuickSearch::Assembly', + 'SL::Controller::TopQuickSearch::Assortment', 'SL::Controller::TopQuickSearch::Contact', + 'SL::Controller::TopQuickSearch::SalesQuotation', + 'SL::Controller::TopQuickSearch::SalesOrder', + 'SL::Controller::TopQuickSearch::SalesDeliveryOrder', + 'SL::Controller::TopQuickSearch::RequestForQuotation', + 'SL::Controller::TopQuickSearch::PurchaseOrder', + 'SL::Controller::TopQuickSearch::PurchaseDeliveryOrder', 'SL::Controller::TopQuickSearch::GLTransaction', + 'SL::Controller::TopQuickSearch::Customer', + 'SL::Controller::TopQuickSearch::Vendor', ); my %modules_by_name; @@ -58,9 +68,18 @@ sub available_modules { } sub enabled_modules { - my %enabled_names = map { - $_ => 1 - } @{ $::instance_conf->get_quick_search_modules }; + my $user_prefs = SL::Helper::UserPreferences->new( + namespace => 'TopQuickSearch', + ); + + my @quick_search_modules; + if (my $prefs_val = $user_prefs->get('quick_search_modules')) { + @quick_search_modules = split ',', $prefs_val; + } else { + @quick_search_modules = @{ $::instance_conf->get_quick_search_modules }; + } + + my %enabled_names = map { $_ => 1 } @quick_search_modules; grep { $enabled_names{$_->name} @@ -69,7 +88,7 @@ sub enabled_modules { sub active_modules { grep { - $::auth->assert($_->auth, 1) + !$_->auth || $::auth->assert($_->auth, 1) } $_[0]->enabled_modules } @@ -82,7 +101,7 @@ sub init_module { die 'Unknown module ' . $::form->{module} unless my $class = $modules_by_name{$::form->{module}}; - $::auth->assert($class->auth); + $::auth->assert($class->auth) if $class->auth; return $class->new; } @@ -181,7 +200,6 @@ The full interface is described in L =head1 TODO * user configuration - * searches for orders, customers, vendors =head1 BUGS