From 2bea97c2975667b9bccfa6fca05d903b7c3811dd Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 20 Oct 2019 13:59:32 +0100
Subject: [PATCH] mtest: Provide run-mss

No caller yet

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 mtest/common.tcl | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/mtest/common.tcl b/mtest/common.tcl
index 6da2af6..4fc27e7 100644
--- a/mtest/common.tcl
+++ b/mtest/common.tcl
@@ -15,6 +15,8 @@ proc run-mss-userv {user group args} {
 	 $args
 }
 
+proc run-mss {args} { eval [list exec] [mss-program] $args }
+
 file mkdir $tmp/groupfiles
 
 set env(PYTHONHASHSEED) 0
-- 
2.30.2