From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Tue, 6 Sep 2005 16:06:44 +0000 (+0000)
Subject: Revert Makefile.PL change from #25355
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=40902b1a555ae1a75d0a35db22ea4584a0d25db9;p=p5sagit%2Fp5-mst-13.2.git

Revert Makefile.PL change from #25355

p4raw-id: //depot/perl@25359
---

diff --git a/ext/IO/Makefile.PL b/ext/IO/Makefile.PL
index 6855ee4..095d7c2 100644
--- a/ext/IO/Makefile.PL
+++ b/ext/IO/Makefile.PL
@@ -1,49 +1,9 @@
-# This -*- perl -*- script makes the Makefile
-
-require 5.006_001;
 use ExtUtils::MakeMaker;
 use Config qw(%Config);
 
-#--- MY package
-
-sub MY::libscan {
-  my($self,$path) = @_;
-
-  return '' 
-	if($path =~ m:/(RCS|CVS|SCCS|\.svn)/: ||
-	   $path =~ m:[~%]$: ||
-	   $path =~ m:\.(orig|rej)$:
-	  );
- 
-  $path;
-}
-
-
-#--- Attempt to find <poll.h>
-
-my $define = "";
-
-unless (exists $Config{'i_poll'}) {
-  my @inc = split(/\s+/, join(" ",$Config{'usrinc'},$Config{'incpth'},$Config{'locincpth'}));
-  foreach $path (@inc) {
-      if(-f $path . "/poll.h") {
-	  $define .= "-DI_POLL ";
-	  last;
-      }
-  }
-}
-
-#--- Write the Makefile
-
 WriteMakefile(
 	VERSION_FROM	=> "IO.pm",
 	NAME      	=> "IO",
 	OBJECT		=> '$(O_FILES)', 
-	DEFINE		=> $define,
- 
-	'clean'   	=> {FILES => join(" ",
-					map { "$_ */$_ */*/$_" }
-					qw(*% *.html *.b[ac]k *.old *.orig))
-			   },
-	INSTALLDIRS => 'perl',
+	MAN3PODS	=> {},		# Pods will be built by installman.
 );