X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FExtUtils%2FInstall.pm;h=a744a6fecd6f2463c6578cfb2064bcc0568da98c;hb=e7f779c800b16cb35dd756b0caf53fb5591bd201;hp=212b7c476a41405a921ed01efc41b48116d0d938;hpb=a7d1454b4299cd00e3e854ace9dde44c66a3c06a;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/lib/ExtUtils/Install.pm b/lib/ExtUtils/Install.pm
index 212b7c4..a744a6f 100644
--- a/lib/ExtUtils/Install.pm
+++ b/lib/ExtUtils/Install.pm
@@ -398,6 +398,7 @@ sub run_filter {
 
 Copies each key of %from_to to its corresponding value efficiently.
 Filenames with the extension .pm are autosplit into the $autosplit_dir.
+Any destination directories are created.
 
 $filter_cmd is an optional shell command to run each .pm file through
 prior to splitting and copying.  Input is the contents of the module,
@@ -416,8 +417,6 @@ sub pm_to_blib {
     use File::Path qw(mkpath);
     use File::Compare qw(compare);
     use AutoSplit;
-    # my $my_req = $self->catfile(qw(auto ExtUtils Install forceunlink.al));
-    # require $my_req; # Hairy, but for the first
 
     if (!ref($fromto) && -r $fromto)
      {