From 2b3c7280d80580b5aad0500a2121db51f6856ade Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Tue, 18 Apr 2006 09:26:13 +0000
Subject: [PATCH]   - removed readln

git-svn-id: trunk@3268 -
---
 tests/webtbs/tw5001.pp | 1 -
 1 file changed, 1 deletion(-)

diff --git a/tests/webtbs/tw5001.pp b/tests/webtbs/tw5001.pp
index 84fd6fa055..d67977afc5 100644
--- a/tests/webtbs/tw5001.pp
+++ b/tests/webtbs/tw5001.pp
@@ -10,7 +10,6 @@ resourcestring
 
 begin
   writeln(s);
-  readln;
   if length(s)=0
     then halt(1);
   if (s<>'test')