From: Adam Chlipala <adamc@hcoop.net>
Date: Sat, 26 Aug 2006 21:53:55 +0000 (+0000)
Subject: mod_dav
X-Git-Tag: release_2010-11-19~360
X-Git-Url: https://git.hcoop.net/hcoop/domtool2.git/commitdiff_plain/c8505e59eff4d6fdc0a51b91b0046a4dae14a273

mod_dav
---

diff --git a/lib/mod_dav.dtl b/lib/mod_dav.dtl
new file mode 100644
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
--- a/src/plugins/apache.sml
+++ b/src/plugins/apache.sml
@@ -509,4 +509,16 @@ val () = Env.action_one "addDefaultCharset"
 		    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
diff --git a/tests/testApache.dtl b/tests/testApache.dtl
index eee8980..3987492 100644
--- a/tests/testApache.dtl
+++ b/tests/testApache.dtl
@@ -72,4 +72,11 @@ domain "hcoop.net" with
 			satisfyAny
 		end
 	end;
+
+	vhost "svn" with
+		location "/" with
+			davSvn "/home/adamc/svn";
+			authzSvnAccessFile "/home/adamc/svn/acl";
+		end
+	end;
 end