* disabled writeln to avoid dbdigest getting confused while parsing

    garbage output

git-svn-id: trunk@2244 -

tests/webtbs/tw4390.pp

@@ -13,7 +13,7 @@ var
 BEGIN
   move(Buf,s[1],size);
   s[0]:=chr(size);
-  writeln('Writing: "',s,'"');
+//  writeln('Writing: "',s,'"');
   if s<>'TEST' then
     halt(1);
 END;