mod_dav

diff --git a/lib/mod_dav.dtl b/lib/mod_dav.dtl
new file mode 100644 (file)
index 0000000..a3ff747
--- /dev/null
+++ b/lib/mod_dav.dtl
@@ -0,0 +1,8 @@
+{{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.}}

diff --git a/src/plugins/apache.sml b/src/plugins/apache.sml
index 3c29c8e..d706de9 100644 (file)
--- a/src/plugins/apache.sml
+++ b/src/plugins/apache.sml
@@ -509,4 +509,16 @@ val () = Env.action_one "addDefaultCharset"
                    write ty;
                    write "\n"))
 
                    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
 end

diff --git a/tests/testApache.dtl b/tests/testApache.dtl
index eee8980..3987492 100644 (file)
--- a/tests/testApache.dtl
+++ b/tests/testApache.dtl
@@ -72,4 +72,11 @@ domain "hcoop.net" with
                        satisfyAny
                end
        end;
                        satisfyAny
                end
        end;

+
+       vhost "svn" with
+               location "/" with
+                       davSvn "/home/adamc/svn";
+                       authzSvnAccessFile "/home/adamc/svn/acl";
+               end
+       end;

 end
 end