do not emit PHP requires for package's own files

1 files changed, 9 insertions, 0 deletions

diff --git a/php.req b/php.req
index c8209aa..5f2f79d 100755
--- a/php.req
+++ b/php.req
@@ -75,6 +75,15 @@ foreach (@ARGV ? $ARGV : <> ) {
 	}
 }
 
+sub cat_ { my @l = map { my $F; open($F, '<', $_) ? <$F> : () } @_; wantarray() ? @l : join '', @l }
+
+my $cache = "$ENV{RPM_BUILD_ROOT}.php.req.file.cache";
+if (-f $cache) {
+	@files = cat_($cache);
+} else {
+	qx(find $ENV{RPM_BUILD_ROOT} -name "*php"|grep -v /usr/share/doc |sed -e 's!$ENV{RPM_BUILD_ROOT}!!' > $cache);
+}
+
 f: for $f (keys %req) {
 	for $g (@files) { next f if ($g =~ /\Q$f\E$/); }
 	print "pear($f)\n";