From: Jeff Trawick <trawick@apache.org>
Date: Fri, 13 Sep 2013 00:01:21 +0000 (+0000)
Subject: works with (Strawberry) Perl 5.010 from 2009, so require that version; move to older... 
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=bfe7a4d04f54470d7a16a3f5097c8db420f9846f;p=thirdparty%2Fapache%2Fhttpd.git

works with (Strawberry) Perl 5.010 from 2009, so require that version; move to older File::Path interface

git-svn-id: https://svn.apache.org/repos/asf/httpd/httpd/trunk@1522747 13f79535-47bb-0310-9956-ffa450edef68
---

diff --git a/README.cmake b/README.cmake
index d5233ea890a..09a4d038cd6 100644
--- a/README.cmake
+++ b/README.cmake
@@ -278,8 +278,6 @@ Known Bugs and Limitations
 * no support for static support library builds; unclear if that is a
   requirement; if so: taking PCRE as an example, we'd need to detect that it
   is static and then turn on PCRE_STATIC for the libhttpd build
-* build/cpR_noreplace.pl doesn't declare what version of Perl is required
-  and doesn't work with File::Path that is missing make_path
 
 Generally:
 
diff --git a/build/cpR_noreplace.pl b/build/cpR_noreplace.pl
index 03f904ba521..054f572e362 100644
--- a/build/cpR_noreplace.pl
+++ b/build/cpR_noreplace.pl
@@ -19,7 +19,9 @@ use strict;
 use File::Basename;
 use File::Copy;
 use File::Find;
-use File::Path qw(make_path);
+use File::Path qw(mkpath);
+
+require 5.010;
 
 my $srcdir;
 my $destdir;
@@ -42,7 +44,7 @@ sub process_file {
             # Create it.
             my $dir = dirname($destfile);
             if (! -e $dir) {
-                make_path($dir) or die "Failed to create directory $dir: $!";
+                mkpath($dir) or die "Failed to create directory $dir: $!";
             }
             copy($File::Find::name, $destfile) or die "Copy $File::Find::name->$destfile failed: $!";
         }