Parcourir la source

* removed stale debug writeln

git-svn-id: trunk@13759 -
marco il y a 16 ans
Parent
commit
9c0e066d25
1 fichiers modifiés avec 1 ajouts et 1 suppressions
  1. 1 1
      packages/chm/src/chmwriter.pas

+ 1 - 1
packages/chm/src/chmwriter.pas

@@ -1200,7 +1200,7 @@ begin
       FreeAndNil(NextLevelItems);
 
   while NextLevelItems <> nil do
-  begin  WriteLn('Loop');
+  begin  
     CurrentLevelItems := NextLevelItems;
     NextLevelItems := TFPList.Create;