From 7f63c807f765543c1a284a074e30b078b2c67e09 Mon Sep 17 00:00:00 2001
From: Jerome Quelin <jquelin@mageia.org>
Date: Mon, 29 Aug 2011 11:07:18 +0000
Subject: keep lower-case perl provides in automatic extraction

---
 find-provides.in | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'find-provides.in')

diff --git a/find-provides.in b/find-provides.in
index cd9ba09..c9c163e 100755
--- a/find-provides.in
+++ b/find-provides.in
@@ -47,7 +47,7 @@ done | sort -u
 #
 # --- Perl modules.
 [ -x @RPMVENDORDIR@/perl.prov ] &&
-    echo "$filelist" | tr '[:blank:]' \\n | @RPMVENDORDIR@/perl.prov | grep 'perl([[:upper:]]' | sort -u \
+    echo "$filelist" | tr '[:blank:]' \\n | @RPMVENDORDIR@/perl.prov | grep 'perl(' | sort -u \
     	&& test ${PIPESTATUS[2]} -ne 0 && echo 'error: @RPMVENDORDIR@/perl.prov failed' >&2 && exit 1
 
 #
-- 
cgit v1.2.1