Fehlende Pakete fürs beta Release

[kivitendo-erp.git] / scripts / find-use.pl

diff --git a/scripts/find-use.pl b/scripts/find-use.pl
index 9024221..bd58c07 100755 (executable)
--- a/scripts/find-use.pl
+++ b/scripts/find-use.pl
@@ -35,7 +35,14 @@ my (%uselines, %modules, %supplied, %requires);
   },
   'Devel::REPL' => {
     'namespace::clean'                   => 1,
-  }
+  },
+  'Email::MIME' => {
+    'Email::MIME::Creator'               => 1,
+  },
+  'Test::Harness' => {
+    'TAP::Parser'                        => 1,
+    'TAP::Parser::Aggregator'            => 1,
+  },
 );
 
 GetOptions(
@@ -106,6 +113,11 @@ for my $useline (keys %uselines) {
   }
 }
 
+# have all documented modules mentioned here
+$modules{$_->{name}} ||= { status => 'required' } for @SL::InstallationCheck::required_modules;
+$modules{$_->{name}} ||= { status => 'optional' } for @SL::InstallationCheck::optional_modules;
+$modules{$_->{name}} ||= { status => 'developer' } for @SL::InstallationCheck::developer_modules;
+
 # build transitive closure for documented dependancies
 my $changed = 1;
 while ($changed) {