chiark
/
gitweb
/
~ian
/
secnet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
mtest: Break out mss-run-userv
[secnet.git]
/
mtest
/
common.tcl
diff --git
a/mtest/common.tcl
b/mtest/common.tcl
index 6b6b16dcfac7e6f7af2968bad085fb6913480a02..3db8d5caac9741ccbc02a7efb24cdde82d1fb199 100644
(file)
--- a/
mtest/common.tcl
+++ b/
mtest/common.tcl
@@
-1,5
+1,15
@@
source test-common.tcl
source test-common.tcl
+proc mss-program {} {
+ set l ./make-secnet-sites
+}
+
+proc run-mss-userv {user group args} {
+ eval [list exec env USERV_USER=$user USERV_GROUP=$group] \
+ [mss-program] \
+ $args
+}
+
file mkdir $tmp/groupfiles
prefix_some_path PYTHONPATH .
file mkdir $tmp/groupfiles
prefix_some_path PYTHONPATH .