summaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2016-09-16 13:39:38 +0200
committerThierry Vignaud <thierry.vignaud@gmail.com>2016-09-16 15:56:28 +0200
commita1d5194939faf6e27a18feede4c40a5fdd0a6d25 (patch)
treef9e4dfe2a12c1d4238d3e20911699d3542b02b50 /src
parent19c46e6cd872f4ff5bb5ef4bfcfbb0a2b6b8dca5 (diff)
downloadperl_checker-a1d5194939faf6e27a18feede4c40a5fdd0a6d25.tar
perl_checker-a1d5194939faf6e27a18feede4c40a5fdd0a6d25.tar.gz
perl_checker-a1d5194939faf6e27a18feede4c40a5fdd0a6d25.tar.bz2
perl_checker-a1d5194939faf6e27a18feede4c40a5fdd0a6d25.tar.xz
perl_checker-a1d5194939faf6e27a18feede4c40a5fdd0a6d25.zip
blacklist some basic packages
they are not parsable by perl_checker and thus end in every project blacklist, so ... AutoLoader B Compress::Gzip Compress::Raw::Zlib Config::IniFiles Convert::ASN1 DateTime Digest::base Digest::Perl::MD5 encoding Errno Exporter::Heavy Exporter::Tiny ExtUtils::MakeMaker File::Copy File::Copy::Recursive File::Find File::FnMatch File::GlobMapper FileHandle File::MimeInfo::Magic File::NCopy File::Path File::Slurp File::Sync File::Temp Gtk2::Gdk::Keysyms Hash::Util::FieldHash HTTP::Message HTTP::Request::Common IO::Compress::Base::Common IO::Compress::Gzip IO::File IO::Handle IO::Pipe IO::Socket::INET IO::Socket::IP IO::Socket::SSL IO::Uncompress::Gunzip Libconf::Glueconf Libconf::Templates::Generic::KeyValue List::MoreUtils LWP::UserAgent MDV::Distribconf::Build MIME::Base64 MIME::Words Net::DBus::Binding::Introspector Net::DBus::Binding::Iterator Net::DBus::RemoteObject Net::DBus::Test::MockIterator Net::HTTP Net::HTTP::Methods Net::LDAP Net::LDAP::Constant Net::LDAP::Control Net::LDAP::Filter Net::LDAP::Intermediate Net::LDAP::Schema Net::LDAP::Util Net::SSL overload parent Perl::Tidy Pod::Usage String::Escape Symbol Sys::Syslog Term::ReadKey Test::More Text::ParseWords Text::Wrap Time::ZoneInfo URI::Escape XML::LibXML::AttributeHash XML::LibXML::Boolean XML::LibXML::Error XML::LibXML::Literal XML::LibXML::NodeList XML::LibXML::Number XML::Parser XML::Simple XML::Writer
Diffstat (limited to 'src')
-rw-r--r--src/tree.ml18
1 files changed, 17 insertions, 1 deletions
diff --git a/src/tree.ml b/src/tree.ml
index b843b5c..ef89c2c 100644
--- a/src/tree.ml
+++ b/src/tree.ml
@@ -177,7 +177,23 @@ let get_exported t =
let uses_external_package = function
| "Exporter" | "bytes" | "constant" | "diagnostics" | "feature" | "lib" | "open" | "strict" | "vars" | "warnings" | "Storable"
- | "Config" | "Socket" | "IO::Socket" | "DynaLoader" | "Data::Dumper" | "Time::localtime" | "Expect" -> true
+ | "AutoLoader" | "B" | "Compress::Raw::Zlib" | "Config" | "Config::IniFiles" | "Convert::ASN1"
+ | "DateTime" | "DynaLoader" | "Data::Dumper" | "Digest::base" | "Digest::Perl::MD5" | "encoding" | "Errno"
+ | "Expect" | "Exporter::Heavy" | "Exporter::Tiny" | "ExtUtils::MakeMaker"
+ | "File::Basename" | "File::Copy" | "File::Copy::Recursive" | "File::Find" | "File::FnMatch"
+ | "File::GlobMapper" | "File::MimeInfo::Magic" | "File::NCopy" | "File::Path" | "File::Slurp" | "File::Sync" | "File::Temp" | "FileHandle"
+ | "Gtk2::Gdk::Keysyms" | "Hash::Util::FieldHash" | "HTTP::Message" | "HTTP::Request::Common"
+ | "IO::Compress::Base::Common" | "IO::Compress::Gzip" | "IO::File" | "IO::Handle" | "IO::Pipe" | "IO::Socket" | "IO::Socket::INET" | "IO::Socket::IP"
+ | "IO::Socket::SSL" | "IO::Uncompress::Gunzip"
+ | "Libconf::Glueconf" | "Libconf::Templates::Generic::KeyValue"
+ | "List::MoreUtils" | "LWP::UserAgent" | "MDV::Distribconf::Build" | "MIME::Base64" | "MIME::Words"
+ | "Net::DBus::Binding::Introspector" | "Net::DBus::Binding::Iterator" | "Net::DBus::RemoteObject" | "Net::DBus::Test::MockIterator"
+ | "Net::HTTP" | "Net::HTTP::Methods" | "Net::LDAP" | "Net::LDAP::Constant" | "Net::LDAP::Control" | "Net::LDAP::Filter" | "Net::LDAP::Intermediate"
+ | "Net::LDAP::Schema" | "Net::LDAP::Util" | "Net::SSL"
+ | "overload" | "parent" | "Perl::Tidy" | "Pod::Usage" | "Socket" | "String::Escape" | "Symbol" | "Sys::Syslog"
+ | "Term::ReadKey" | "Test::More" | "Text::ParseWords" | "Text::Wrap" | "Time::localtime" | "Time::ZoneInfo" | "URI::Escape"
+ | "XML::LibXML::AttributeHash" | "XML::LibXML::Boolean" | "XML::LibXML::Error" | "XML::LibXML::Literal" | "XML::LibXML::NodeList" | "XML::LibXML::Number"
+ | "XML::Parser" | "XML::Simple" | "XML::Writer" -> true
| _ -> false
let get_uses t =