Add AuthGroupFile

RequireGroup is kind of useless without it

diff --git a/lib/apache_auth.dtl b/lib/apache_auth.dtl
index 041f4c1..398a048 100644 (file)
--- a/lib/apache_auth.dtl
+++ b/lib/apache_auth.dtl
@@ -16,6 +16,9 @@ extern val authName : no_newlines -> [Location];
 extern val authUserFile : your_path -> [Location];
 {{See <a href="http://httpd.apache.org/docs/2.2/mod/core.html#authuserfile">the
   Apache documentation</a>.}}
+extern val authGroupFile : your_path -> [Location];
+{{See <a href="http://httpd.apache.org/docs/2.2/mod/core.html#authgroupfile">the
+  Apache documentation</a>.}}
 
 extern val requireValidUser : [Location];
 extern val requireUser : [user] -> [Location];

diff --git a/src/plugins/apache.sml b/src/plugins/apache.sml
index 52470c8..f6017dd 100644 (file)
--- a/src/plugins/apache.sml
+++ b/src/plugins/apache.sml
@@ -916,6 +916,13 @@ val () = Env.action_one "authUserFile"
              write name;
              write "\n"))
 
+val () = Env.action_one "authGroupFile"
+        ("file", Env.string)
+        (fn name =>
+            (write "\tAuthGroupFile ";
+             write name;
+             write "\n"))
+
 val () = Env.action_none "requireValidUser"
         (fn () => write "\tRequire valid-user\n")