--- /dev/null
+{{Support for Apache's mod_dav, which we use primarily for Subversion access}}
+
+extern val davSvn : your_path -> [Location];
+{{Enable DAV-based serving of your Subversion repository rooted at the given
+ path.}}
+
+extern val authzSvnAccessFile : your_path -> [Location];
+{{Choose a file to use for Subversion access control.}}
write ty;
write "\n"))
+val () = Env.action_one "davSvn"
+ ("path", Env.string)
+ (fn path => (write "\tDAV svn\n\tSVNPath ";
+ write path;
+ write "\n"))
+
+val () = Env.action_one "authzSvnAccessFile"
+ ("path", Env.string)
+ (fn path => (write "\tAuthzSVNAccessFile ";
+ write path;
+ write "\n"))
+
end