[perl-LWP-MediaTypes] Use MIME type database from mailcap

[Petr Pisar]

commit 0868bb0b365d5c0aed397d714ef09afda53f63bc
Author: Petr Písař <ppisar at redhat.com>
Date:   Thu Mar 17 16:51:44 2011 +0100

    Use MIME type database from mailcap

 perl-LWP-MediaTypes.spec |    9 ++++++++-
 1 files changed, 8 insertions(+), 1 deletions(-)
---
diff --git a/perl-LWP-MediaTypes.spec b/perl-LWP-MediaTypes.spec
index ede0909..a892162 100644
--- a/perl-LWP-MediaTypes.spec
+++ b/perl-LWP-MediaTypes.spec
@@ -1,6 +1,6 @@
 Name:           perl-LWP-MediaTypes
 Version:        6.01
-Release:        1%{?dist}
+Release:        2%{?dist}
 Summary:        Guess media type for a file or a URL
 License:        GPL+ or Artistic
 Group:          Development/Libraries
@@ -14,6 +14,7 @@ BuildRequires:  perl(File::Basename)
 BuildRequires:  perl(Test)
 Requires:       perl(:MODULE_COMPAT_%(eval "`%{__perl} -V:version`"; echo $version))
 Requires:       perl(File::Basename)
+Requires:       mailcap
 Conflicts:      perl-libwww-perl < 6
 
 %description
@@ -25,6 +26,9 @@ used instead. For backwards compatibility we will also look for
 
 %prep
 %setup -q -n LWP-MediaTypes-%{version}
+# Use system-wide mailcap database
+sed -i -e '/my @priv_files = ();/ s|()|("%{_sysconfdir}/mime.types")|' \
+    lib/LWP/MediaTypes.pm
 
 %build
 %{__perl} Makefile.PL INSTALLDIRS=vendor
@@ -46,6 +50,9 @@ make test
 %{_mandir}/man3/*
 
 %changelog
+* Thu Mar 17 2011 Petr Pisar <ppisar at redhat.com> - 6.01-2
+- Use MIME type database from mailcap
+
 * Thu Mar 17 2011 Petr Pisar <ppisar at redhat.com> 6.01-1
 - Specfile autogenerated by cpanspec 1.78.
 - Remove BuildRoot stuff