Commit 50129e6a authored by Karlson2k's avatar Karlson2k Committed by Daniel Stenberg
Browse files

tests: Use 'pathhelp' for paths conversions in secureserver.pl 

Closes #675
parent 4c5d5e5e

tests/secureserver.pl

+5 −3
Original line number Diff line number Diff line
@@ -40,6 +40,8 @@ use serverhelp qw( 
    server_logfilename

    );



use pathhelp;



my $stunnel = "stunnel";



my $verbose=0; # set to 1 for debugging
@@ -229,9 +231,9 @@ if($stunnel_version < 310) { 
if($stunnel =~ /tstunnel(\.exe)?"?$/) {

    $tstunnel_windows = 1;



    # replace Cygwin and MinGW drives within paths

    $capath =~ s/^(\/cygdrive)?\/(\w)\//$2\:\//;

    $certfile =~ s/^(\/cygdrive)?\/(\w)\//$2\:\//;

    # convert Cygwin/MinGW paths to Win32 format

    $capath = pathhelp::sys_native_abs_path($capath);

    $certfile = pathhelp::sys_native_abs_path($certfile);

}



#***************************************************************************