File::MimeInfo statt File::MimeInfo::Magic als Abhängigkeit

diff --git a/SL/InstallationCheck.pm b/SL/InstallationCheck.pm
index 297b7ad..631b330 100644 (file)
--- a/SL/InstallationCheck.pm
+++ b/SL/InstallationCheck.pm
@@ -31,7 +31,7 @@ BEGIN {
   { name => "Email::MIME",                         url => "http://search.cpan.org/~rjbs/",      debian => 'libemail-mime-perl' },
   { name => "FCGI",            version => '0.72',  url => "http://search.cpan.org/~mstrout/",   debian => 'libfcgi-perl' },
   { name => "File::Copy::Recursive",               url => "http://search.cpan.org/~dmuey/",     debian => 'libfile-copy-recursive-perl' },
-  { name => "File::MimeInfo::Magic",               url => "http://search.cpan.org/~michielb/",  debian => 'libfile-mimeinfo-perl' },
+  { name => "File::MimeInfo",                      url => "http://search.cpan.org/~michielb/",  debian => 'libfile-mimeinfo-perl' },
   { name => "GD",                                  url => "http://search.cpan.org/~lds/",       debian => 'libgd-gd2-perl', },
   { name => 'HTML::Parser',                        url => 'http://search.cpan.org/~gaas/',      debian => 'libhtml-parser-perl', },
   { name => 'HTML::Restrict',                      url => 'http://search.cpan.org/~oalders/', },

diff --git a/scripts/find-use.pl b/scripts/find-use.pl
index da5d65f..8078e50 100755 (executable)
--- a/scripts/find-use.pl
+++ b/scripts/find-use.pl
@@ -65,6 +65,9 @@ my (%uselines, %modules, %supplied, %requires);
   'URI' => {
     'URI::Escape'                        => 1,
   },
+  'File::MimeInfo' => {
+    'File::MimeInfo::Magic'              => 1,
+  },
 );
 
 GetOptions(