diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/tree.ml | 18 |
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 = |