mtest/t-userv: Check for dangerous parsing of late options

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/mtest/t-userv b/mtest/t-userv
index 5131076c1d4abb62bb6eb870f3533fdc854d78e2..5d159bdb3c9dd0a542eb9f9e0af5440b23091958 100755 (executable)
--- a/mtest/t-userv
+++ b/mtest/t-userv
@@ -14,4 +14,24 @@ diff-output e-userv out .sites
 
 #----- argument parser does not look for args beyond header -----
 
-#run-mss-userv 
+set env(LC_MESSAGES) C
+
+set try [lreplace $good 4 4 --misparse-test]
+
+if {![catch {
+    eval run-mss-userv $try
+} emsg]} {
+    error "should have failed"
+} else {
+    switch -glob $emsg {
+       {*unrecognized arguments: --misparse-test*} {
+           error "misparsed!"
+       }
+       {*No such file or directory: '--misparse-test/TGinside'*} {
+       }
+       * {
+           error "huh ? $emsg"
+       }
+    }
+}
+