X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=mtest%2Ft-userv;h=a3843e08f00f08bfa6d94a85185e4e24c4b8f4d7;hb=81a34149e76f53d73f2c9e15f42e24f1907ac185;hp=5d159bdb3c9dd0a542eb9f9e0af5440b23091958;hpb=627bf9eb662972a9b2d923bfdeb6cc01ac249095;p=secnet.git

diff --git a/mtest/t-userv b/mtest/t-userv
index 5d159bdb..a3843e0 100755
--- a/mtest/t-userv
+++ b/mtest/t-userv
@@ -35,3 +35,23 @@ if {![catch {
     }
 }
 
+#----- wrong group is rejected -----
+
+set bad [lreplace $good 1 1 Gwrong]
+
+if {![catch {
+    eval run-mss-userv $bad
+} emsg]} {
+    error "should have failed"
+} else {
+    switch -glob $emsg {
+	{*caller not in group Ginside*} { }
+	* { error "huh ? $emsg" }
+    }
+}
+
+#----- resulting sites file is processable -----
+
+eval run-mss $tmp/out.sites >$tmp/out.conf
+
+diff-mss-sites-conf mtest/e-userv.conf $tmp/out.conf