From 72887bda14d22d91807850aa8550a07953596129 Mon Sep 17 00:00:00 2001
From: rjray <devnull@localhost>
Date: Thu, 16 Nov 2000 08:06:35 +0000
Subject: minor nits

CVS patchset: 4282
CVS date: 2000/11/16 08:06:35
---
 Perl-RPM/Makefile.PL     | 5 +----
 Perl-RPM/t/01_database.t | 1 +
 2 files changed, 2 insertions(+), 4 deletions(-)

diff --git a/Perl-RPM/Makefile.PL b/Perl-RPM/Makefile.PL
index af95c8845..7173ade10 100644
--- a/Perl-RPM/Makefile.PL
+++ b/Perl-RPM/Makefile.PL
@@ -1,6 +1,6 @@
 #!/bin/perl
 
-# $Id: Makefile.PL,v 1.16 2000/11/14 06:19:10 rjray Exp $
+# $Id: Makefile.PL,v 1.17 2000/11/16 08:06:35 rjray Exp $
 
 use Config;
 use ExtUtils::MakeMaker;
@@ -229,9 +229,6 @@ Native Bindings to the RPM API for Perl 5.005 and later. Uses a combination
 of Perl and C/XS (compiled) code to provide access to the RPM database,
 headers of installed packages, and more.
 
-# Provide perl-specific find-requires.
-%define __find_requires /usr/lib/rpm/find-requires.perl
-
 %prep
 %setup -q -n SPEC_DISTNAME-%{version} 
 
diff --git a/Perl-RPM/t/01_database.t b/Perl-RPM/t/01_database.t
index b8e0b8601..d6de2885e 100755
--- a/Perl-RPM/t/01_database.t
+++ b/Perl-RPM/t/01_database.t
@@ -26,6 +26,7 @@ if ($test_pack)
     @test_requires = `rpm -q --requires $test_pack`;
     chomp(@test_requires);
     @test_requires = map { (split(/ /, $_))[0] } grep(! m|^/|, @test_requires);
+    @test_requires = grep(! /^rpmlib\(/, @test_requires);
     @test_required_by = `rpm -q --whatrequires $test_pack`;
     chomp(@test_required_by);
     @test_required_by = map { @p = split('-', $_);
-- 
cgit v1.2.3