- removed readln

git-svn-id: trunk@3268 -

tests/webtbs/tw5001.pp

@@ -10,7 +10,6 @@ resourcestring
 
 begin
   writeln(s);
-  readln;
   if length(s)=0
     then halt(1);
   if (s<>'test')