From d5b9f6be2d625a8a8c617054b6586802a5fcedbf Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Niels=20M=C3=B6ller?= <nisse@lysator.liu.se>
Date: Tue, 15 Apr 2003 16:45:32 +0200
Subject: [PATCH] Started writing a https test. Doesn't work yet, though.

Rev: lib/modules/SSL.pmod/testsuite.in:1.3
---
 lib/modules/SSL.pmod/testsuite.in | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/lib/modules/SSL.pmod/testsuite.in b/lib/modules/SSL.pmod/testsuite.in
index deae05595e..bd982ed8df 100644
--- a/lib/modules/SSL.pmod/testsuite.in
+++ b/lib/modules/SSL.pmod/testsuite.in
@@ -1,4 +1,4 @@
-dnl $Id: testsuite.in,v 1.2 2003/02/07 12:16:59 jhs Exp $
+dnl $Id: testsuite.in,v 1.3 2003/04/15 14:45:32 nisse Exp $
 
 test_any([[
 #pike 7.4
@@ -9,3 +9,13 @@ test_any([[
 #pike 7.4
 return SSL.cipher && 1;
 ]], 1)
+
+dnl   test_do([[
+dnl     object p = Process.Process(RUNPIKE + " \"]]SRCDIR[[/https.pike\"");
+dnl     sleep(5); /* Wait a little for the server to startup */
+dnl     Protocols.HTTP.Query q = Protocols.HTTP.get_url("https://localhost:25678");
+dnl     if (q->status != 200 || search("html", q->data()) < 0)
+dnl       error("Failed\n");
+dnl     /* How to kill the process if running on windows? */
+dnl     p->kill(15);
+dnl   ]])
-- 
GitLab