From: Moritz Bunkus <m.bunkus@linet.de>
Date: Mon, 4 Jan 2021 12:50:05 +0000 (+0100)
Subject: Quick-Suche: `auth` == undef oder leerer String gefixt
X-Git-Tag: kivitendo-mebil_0.1-0~9^2~541^2
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=ed83f90c4d4cd38c50a563c4f7d7075d0254b045;p=kivitendo-erp.git

Quick-Suche: `auth` == undef oder leerer String gefixt

Laut Doku in `SL/Controller/TopQuickSearch/Base.pm` bedeuten undef
oder leerer String als Rückgabewert der Sub `auth`, dass dieses Modul
für alle Benutzer*innen zur Verfügung steht, unabhängig von deren
vorhandenen Gruppenrechten.

Das hat nur nicht funktioniert.
---

diff --git a/SL/Controller/TopQuickSearch.pm b/SL/Controller/TopQuickSearch.pm
index d6ce6e1fc..03d650443 100644
--- a/SL/Controller/TopQuickSearch.pm
+++ b/SL/Controller/TopQuickSearch.pm
@@ -88,7 +88,7 @@ sub enabled_modules {
 
 sub active_modules {
   grep {
-    $::auth->assert($_->auth, 1)
+    !$_->auth || $::auth->assert($_->auth, 1)
   } $_[0]->enabled_modules
 }
 
@@ -101,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;
 }