From 66c66c9b097975ec2ab0fab57cf9ee537d2923cb Mon Sep 17 00:00:00 2001
From: michael <michael@freepascal.org>
Date: Tue, 17 Aug 2004 18:30:43 +0000
Subject: [PATCH] + Added HTTP test

---
 packages/base/netdb/testsvc.pp | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/packages/base/netdb/testsvc.pp b/packages/base/netdb/testsvc.pp
index 4251bd8db3..d63fe50bc3 100644
--- a/packages/base/netdb/testsvc.pp
+++ b/packages/base/netdb/testsvc.pp
@@ -55,6 +55,7 @@ begin
 end;
 
 begin
+  testport(80,'tcp');
   testport(25,'');
   testport(23,'');
   testport(53,'udp');
@@ -66,7 +67,10 @@ end.
 
 {
   $Log$
-  Revision 1.2  2003-05-17 20:54:03  michael
+  Revision 1.3  2004-08-17 18:30:43  michael
+  + Added HTTP test
+
+  Revision 1.2  2003/05/17 20:54:03  michael
   + uriparser unit added. Header/Footer blocks added
 
 }