X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/6bab0fff323c36de9e247487f043da1b29dea6fd..f217d072d76183bc07723dcc29503b732bd2022d:/scripts/find-use.pl diff --git a/scripts/find-use.pl b/scripts/find-use.pl index c583ecc8e..cad3d21a1 100755 --- a/scripts/find-use.pl +++ b/scripts/find-use.pl @@ -25,6 +25,12 @@ my (%uselines, %modules, %supplied, %requires); 'DateTime::Duration' => 1, 'DateTime::Infinite' => 1, }, + 'Exception::Class' => { + 'Exception::Class::Base' => 1, + }, + 'Rose::DB' => { + 'Rose::DB::Cache' => 1, + }, 'Rose::DB::Object' => { 'Rose::DB::Object::ConventionManager' => 1, 'Rose::DB::Object::Manager' => 1, @@ -89,7 +95,7 @@ find(sub { next if /SL::/; next if /Support::Files/; # our own test support module next if /use (warnings|strict|vars|lib|constant|utf8)/; - next if /^use (with|the)/; + next if /^use (it|the|with)/; my ($useline) = m/^use\s+(.*?)$/; @@ -145,7 +151,7 @@ $modules{$_->{name}} ||= { status => 'required' } for @SL::InstallationCheck::re $modules{$_->{name}} ||= { status => 'optional' } for @SL::InstallationCheck::optional_modules; $modules{$_->{name}} ||= { status => 'developer' } for @SL::InstallationCheck::developer_modules; -# build transitive closure for documented dependancies +# build transitive closure for documented dependencies my $changed = 1; while ($changed) { $changed = 0; @@ -249,7 +255,7 @@ This module is included in C. Don't worry about it. =item required This module is documented in C to be necessary, or is a -dependancy of one of these. Everything alright. +dependency of one of these. Everything alright. =item !missing