diff options
author | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2006-03-16 14:19:14 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2006-03-16 14:19:14 +0000 |
commit | 6fa90611b7402ce0231368af67528fdab6419250 (patch) | |
tree | 65ce12058c506591687c627d9081e875a371891f | |
parent | a65d42610d519ecbf2b49068c336f7e7cb9f1554 (diff) | |
download | rpm-setup-6fa90611b7402ce0231368af67528fdab6419250.tar rpm-setup-6fa90611b7402ce0231368af67528fdab6419250.tar.gz rpm-setup-6fa90611b7402ce0231368af67528fdab6419250.tar.bz2 rpm-setup-6fa90611b7402ce0231368af67528fdab6419250.tar.xz rpm-setup-6fa90611b7402ce0231368af67528fdab6419250.zip |
Don't search perl files for provides if they don't end with .pm (because
if they don't, the perl interpreter won't look them up in @INC)
-rwxr-xr-x | perl.prov | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -47,6 +47,7 @@ if ("@ARGV") { foreach (@ARGV) { + next if !/\.pm$/; process_file($_); } } else { @@ -56,6 +57,7 @@ if ("@ARGV") { foreach (<>) { chomp $_; + next if !/\.pm$/; process_file($_) if -f $_; } } |