testNoHtaccess

diff --git a/lib/apache.dtl b/lib/apache.dtl
index ebfbeb4..483330f 100644 (file)
--- a/lib/apache.dtl
+++ b/lib/apache.dtl
@@ -79,3 +79,5 @@ extern val serverAlias : host -> [Vhost];
 extern val serverAliasDefault : [Vhost];
 {{Like serverAliasDefault, but adds aliases for the domains being configured
   instead of any of their hosts/"subdomains".}}
+
+extern val testNoHtaccess : [Location];

diff --git a/src/plugins/apache.sml b/src/plugins/apache.sml
index eb4623a..b34eb56 100644 (file)
--- a/src/plugins/apache.sml
+++ b/src/plugins/apache.sml
@@ -1050,4 +1050,7 @@ val () = Domain.registerDescriber (Domain.considerAll
                                    Domain.Extension {extension = "vhost_ssl",
                                                      heading = fn host => "SSL web vhost " ^ host ^ ":"}])
 
+val () = Env.action_none "testNoHtaccess"
+        (fn path => write "\tAllowOverride None\n")
+
 end