From 4c8899698120c3d25558d0cdb2ba0903da044da0 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Thu, 8 Mar 2012 18:19:09 +0000
Subject: blacklist some function names that perl_checker dislike (use, ...)

---
 NEWS                 | 2 ++
 fake_packages/gen.pl | 2 ++
 2 files changed, 4 insertions(+)

diff --git a/NEWS b/NEWS
index 02a5447..5b1be87 100644
--- a/NEWS
+++ b/NEWS
@@ -1,3 +1,5 @@
+- blacklist some function names that perl_checker dislike (use, ...)
+
 Version 1.2.14 - 01 February 2012, by Thierry Vignaud
 
 - update fake packages
diff --git a/fake_packages/gen.pl b/fake_packages/gen.pl
index aaf4a4d..b2a9311 100755
--- a/fake_packages/gen.pl
+++ b/fake_packages/gen.pl
@@ -10,6 +10,8 @@ sub get_paras {
     my ($name, $para) = @_;
     $name =~ s/\Q$current_prefix//;
     $current_name = $name;
+    # perl_checker don't like those:
+    return if member($name, qw(print use));
     $l{$current_package}{$name} = [ map {
 	if (/\Q.../) {
 	    '@_more_paras';
-- 
cgit v1.2.1