* commented a forgotten debug writeln

git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@13840 3ad0048d-3df7-0310-abae-a5850022a9f2

1 files changed, 1 insertions, 1 deletions

diff --git a/packages/chm/src/chmwriter.pas b/packages/chm/src/chmwriter.pas
index d12f03e785..1c479c42d0 100644
--- a/packages/chm/src/chmwriter.pas
+++ b/packages/chm/src/chmwriter.pas
@@ -1816,7 +1816,7 @@ begin
       for i:=0 to Indexblocknr-1 do
         begin
           Entrybytes:=ScanIndexBlock(@blockn[i][0]);
-          writeln('after scan ,',i, ' bytes: ',entrybytes,' blocknr:',blocknr,' indexblocknr:',indexblocknr,' to:',blocknr+i);
+//          writeln('after scan ,',i, ' bytes: ',entrybytes,' blocknr:',blocknr,' indexblocknr:',indexblocknr,' to:',blocknr+i);
           MoveIndexEntry(i,Entrybytes,blocknr+i);
           indexStream.Write(blockn[i][0],defblocksize);
         end;