X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=scripts%2Ffind-use.pl;h=c583ecc8eb9f612fcc953277cfb6aad43c014108;hb=cf0455f57e7fe398b59a3c4a01f459d16b9db419;hp=da5d65f295f2bf089b40eadba5164a7449e8a56d;hpb=b3fadc524c3ca071b48a93f9077d71846a1ec358;p=kivitendo-erp.git diff --git a/scripts/find-use.pl b/scripts/find-use.pl index da5d65f29..c583ecc8e 100755 --- a/scripts/find-use.pl +++ b/scripts/find-use.pl @@ -5,7 +5,6 @@ BEGIN { unshift(@INC, $FindBin::Bin . '/../modules/override'); # Use our own versions of various modules (e.g. YAML). push (@INC, $FindBin::Bin . '/..'); # '.' will be removed from @INC soon. - push (@INC, $FindBin::Bin . '/../modules/fallback'); # Only use our own versions of modules if there's no system version. } use strict; @@ -65,6 +64,9 @@ my (%uselines, %modules, %supplied, %requires); 'URI' => { 'URI::Escape' => 1, }, + 'File::MimeInfo' => { + 'File::MimeInfo::Magic' => 1, + }, ); GetOptions( @@ -221,7 +223,6 @@ find-use =head1 EXAMPLE # perl scipts/find-use.pl - !missing : Perl::Tags !missing : Template::Constants !missing : DBI