X-Git-Url: https://git.hcoop.net/hcoop/domtool2.git/blobdiff_plain/781ebc11c3ab9b359cd0ee1cc653bd8f223a0bd8..931aae1463c95af3bb24a5cec367fe657a478856:/src/plugins/apache.sml

diff --git a/src/plugins/apache.sml b/src/plugins/apache.sml
index 617420a..fda708e 100644
--- a/src/plugins/apache.sml
+++ b/src/plugins/apache.sml
@@ -86,6 +86,10 @@ val _ = Env.type_one "suexec_flag"
 	Env.bool
 	(fn b => b orelse Domain.hasPriv "www")
 
+val _ = Env.type_one "regexp"
+	Env.string
+	Pcre.validRegexp
+
 fun validLocation s =
     size s > 0 andalso size s < 1000 andalso CharVector.all
 						 (fn ch => Char.isAlphaNum ch