test-example: Test new long-term key arrangements

[secnet.git] / stest / t-nonnego-on

diff --git a/stest/t-nonnego-on b/stest/t-nonnego-on
new file mode 100755 (executable)
index 0000000..813d2f8
--- /dev/null
+++ b/stest/t-nonnego-on
@@ -0,0 +1,12 @@
+#! /usr/bin/tclsh
+
+source stest/common.tcl
+
+# `non-negotiating' ends:
+set privkey(inside) test-example/inside.key
+# So old, new; ie -on
+
+# There is no -no because the sites file tells a new inside to expect
+# a different key.
+
+test-kex