File tree 1 file changed +5
-3
lines changed
1 file changed +5
-3
lines changed Original file line number Diff line number Diff line change @@ -479,15 +479,17 @@ sub CopyIncludeFiles
479
479
my $D ;
480
480
opendir ($D , ' src/include' ) || croak " Could not opendir on src/include!\n " ;
481
481
482
+ # some xcopy progs don't like mixed slash style paths
483
+ (my $ctarget = $target ) =~ s ! /! \\ ! g ;
482
484
while (my $d = readdir ($D ))
483
485
{
484
486
next if ($d =~ / ^\. / );
485
487
next if ($d eq ' .git' );
486
488
next if ($d eq ' CVS' );
487
- next unless (-d ' src/include/' . $d );
489
+ next unless (-d " src/include/$d " );
488
490
489
- EnsureDirectories($target . ' /include/server' , $d );
490
- system (" xcopy /s /i /q /r /y src\\ include\\ $d \\ *.h \" $target \\ include\\ server\\ $d \\\" " )
491
+ EnsureDirectories(" $target /include/server/ $d " );
492
+ system (qq{ xcopy /s /i /q /r /y src\\ include\\ $d \\ *.h " $ctarget \\ include\\ server\\ $d \\ " } )
491
493
&& croak(" Failed to copy include directory $d \n " );
492
494
}
493
495
closedir ($D );
You can’t perform that action at this time.
0 commit comments