workaround a bug, suspected in File::Spec on Mac OS X
git-svn-id: https://svn.apache.org/repos/asf/httpd/docs-build/trunk@432714 13f79535-47bb-0310-9956-ffa450edef68
diff --git a/lib/DocUtil.pm b/lib/DocUtil.pm
index d972ed9..e77f28d 100644
--- a/lib/DocUtil.pm
+++ b/lib/DocUtil.pm
@@ -77,6 +77,7 @@
# use HTTP path separators (/)
$docpath = join '/' => ('', File::Spec->splitdir($docpath), '');
+ 1 while ($docpath =~ s,/\./,/,g); # something's bogus on the Mac otherwise
$docpath =~ y,/,/,s; # squeeze multiple slashes
# compute relative (HTTP-)path from srcfile to docroot
