wrowe 01/10/15 07:43:01
Modified: perl-framework/Apache-Test/lib/Apache TestConfig.pm
Log:
Another task for WINFU ... paths need to be forward slashed in Apache.conf,
even against 'platform convention', due to '\' escaping.
Revision Changes Path
1.72 +6 -0
httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm
Index: TestConfig.pm
===================================================================
RCS file:
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm,v
retrieving revision 1.71
retrieving revision 1.72
diff -u -r1.71 -r1.72
--- TestConfig.pm 2001/10/14 02:11:36 1.71
+++ TestConfig.pm 2001/10/15 14:43:01 1.72
@@ -192,6 +192,12 @@
$vars->{t_logs} ||= catfile $vars->{serverroot}, 'logs';
$vars->{t_conf_file} ||= catfile $vars->{t_conf}, 'httpd.conf';
+ if (WINFU) {
+ for (keys %$vars) {
+ $vars->{$_} =~ s|\\|\/|g;
+ }
+ }
+
$vars->{scheme} ||= 'http';
$vars->{servername} ||= $self->default_servername;
$vars->{port} ||= $self->default_port;