From: Michael Prager Date: Sat, 17 Dec 2011 14:06:41 +0000 (+0100) Subject: fixed build.pl to work properly on macos X-Git-Url: https://code.delx.au/comingnext/commitdiff_plain/64dc5e2d3ff061ffbc18593f2e14082acacd8474 fixed build.pl to work properly on macos --- diff --git a/build.pl b/build.pl index ff42ee7..073ecd5 100755 --- a/build.pl +++ b/build.pl @@ -67,9 +67,11 @@ sub copyrecursive { sub copy_files { my $targetdir = $File::Find::dir; $targetdir =~ s/^$copy_source/$copy_target/o; - mkpath( $targetdir ) if not -e $targetdir; + mkpath( $targetdir, 1 ) if not -d $targetdir; + return if -d $File::Find::name; my $targetfile = $File::Find::name; $targetfile =~ s/^$copy_source/$copy_target/o; + print "copy $targetfile\n"; copy($File::Find::name, $targetfile); }