1 files changed, 21 insertions, 0 deletions
diff --git a/src/testsuite/connect-test.e b/src/testsuite/connect-test.e
new file mode 100644
index 00000000..49ce70c1
--- /dev/null
+++ b/src/testsuite/connect-test.e
@@ -0,0 +1,21 @@
+# $Id: connect-test.e,v 1.1 2002/09/09 10:16:24 alex Exp $
+
+spawn telnet localhost 6789
+expect {
+	timeout { exit 1 }
+	"Connected"
+}
+
+send "oper\r"
+expect {
+	timeout { exit 1 }
+	"451"
+}
+
+send "quit\r"
+expect {
+	timeout { exit 1 }
+	"Connection closed"
+}
+
+# -eof-