X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2F1_compile.t;h=72628c30a797ffa2114cffa26de4a4ae0b604b56;hb=d9f203a5233af6609a4b98c6d12d865eadc274ea;hp=eb3c3bd1be2b8213cc9a6f6b292c5e783cd62c4d;hpb=983d1c140ccc5a6746b60b1d15f8f50901ff7b51;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/t/lib/1_compile.t b/t/lib/1_compile.t
index eb3c3bd..72628c3 100644
--- a/t/lib/1_compile.t
+++ b/t/lib/1_compile.t
@@ -19,15 +19,11 @@ my @Core_Modules = grep /\S/, <DATA>;
 chomp @Core_Modules;
 
 if (eval { require Socket }) {
-  push @Core_Modules, qw(Net::Domain);
   # Two Net:: modules need the Convert::EBCDIC if in EBDCIC.
   if (ord("A") != 193 || eval { require Convert::EBCDIC }) {
       push @Core_Modules, qw(Net::Cmd Net::POP3);
   }
 }
-if(eval { require B }) {
-  push @Core_Modules, qw(B::C B::CC B::Stackobj);
-}
 
 @Core_Modules = sort @Core_Modules;
 
@@ -73,6 +69,3 @@ sub compile_module {
 # http://www.pobox.com/~schwern/cgi-bin/perl-qa-wiki.cgi?UntestedModules
 # and vice-versa.  The list should only shrink.
 __DATA__
-CPAN::FirstTime
-DynaLoader
-Pod::Plainer