From a6faddd99b56b3c4e7c7fe026f6175c0dd59faab Mon Sep 17 00:00:00 2001
From: Lubomir Rintel <lkundrak@fedoraproject.org>
Date: Sun, 8 Mar 2009 11:24:15 +0000
Subject: [PATCH] - Fix permissions - Fix requires/provides

---
 perl-Class-Prototyped.spec | 29 +++++++++++++++++++++++++++--
 1 file changed, 27 insertions(+), 2 deletions(-)

diff --git a/perl-Class-Prototyped.spec b/perl-Class-Prototyped.spec
index d63e2e4..c7e81dc 100644
--- a/perl-Class-Prototyped.spec
+++ b/perl-Class-Prototyped.spec
@@ -1,6 +1,6 @@
 Name:           perl-Class-Prototyped
 Version:        1.11
-Release:        2%{?dist}
+Release:        3%{?dist}
 Summary:        Fast prototype-based OO programming in Perl
 License:        GPL+ or Artistic
 Group:          Development/Libraries
@@ -19,6 +19,27 @@ have objects inherit their behavior and state from another object.
 %prep
 %setup -q -n Class-Prototyped-%{version}
 
+cat <<EOF >%{name}-prov
+#!/bin/bash
+# Filter out bogus provides from documentation
+%{__perl_provides} $@ |sed -e 's/perl([ABCD])//g;s/perl(My[^)]*Class)//g'
+EOF
+
+cat <<EOF >%{name}-req
+#!/bin/bash
+# Class/Prototyped/Graph.pm doesn't define Class::Prototyped::Graph package
+# Benchmark is dragged in by a regression test
+%{__perl_requires} $@ |sed -e '/perl(Class::Prototyped::Graph)/d;/perl(Benchmark)/d'
+EOF
+
+%global __perl_provides %{_builddir}/Class-Prototyped-%{version}/%{name}-prov
+%global __perl_requires %{_builddir}/Class-Prototyped-%{version}/%{name}-req
+chmod +x %{__perl_provides} %{__perl_requires}
+
+# Documentation and libraries should not be executable
+chmod -x perf/* examples/* Changes lib/Class/*.pm lib/Class/Prototyped/*
+
+
 %build
 %{__perl} Build.PL installdirs=vendor
 ./Build
@@ -39,11 +60,15 @@ rm -rf %{buildroot}
 
 %files
 %defattr(-,root,root,-)
-%doc Changes README perf/ examples/ t/
+%doc Changes README perf/ examples/
 %{perl_vendorlib}/*
 %{_mandir}/man3/*
 
 %changelog
+* Sun Mar  9 2009 Lubomir Rintel <lkundrak@v3.sk> 1.11-3
+- Fix permissions
+- Fix requires/provides
+
 * Thu Feb 26 2009 Fedora Release Engineering <rel-eng@lists.fedoraproject.org> - 1.11-2
 - Rebuilt for https://fedoraproject.org/wiki/Fedora_11_Mass_Rebuild