From 54b8628671c141dab3f65df002aa55b32d8477eb Mon Sep 17 00:00:00 2001
From: marco <marco@freepascal.org>
Date: Sat, 10 Oct 2009 19:23:30 +0000
Subject: [PATCH]  * Fixes compilation problem

git-svn-id: trunk@13839 -
---
 utils/fpdoc/dw_htmlchm.inc | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/utils/fpdoc/dw_htmlchm.inc b/utils/fpdoc/dw_htmlchm.inc
index febb55eebe..dc74d9d76b 100644
--- a/utils/fpdoc/dw_htmlchm.inc
+++ b/utils/fpdoc/dw_htmlchm.inc
@@ -240,7 +240,7 @@ begin
     end;
   end;
 
-  if not nobintoc then
+  if not fnobintoc then
     fchm.AppendBinaryTOCFromSiteMap(Toc);  
   TOC.SaveToStream(Stream);
   TOC.Free;
@@ -416,7 +416,7 @@ begin
 
     // save
     Index.SaveToStream(Stream);
-    if not nobinindex then
+    if not fnobinindex then
       fchm.AppendBinaryindexFromSitemap(index,false);
     Index.Free;
     Stream.Position :=0 ;
@@ -455,8 +455,8 @@ begin
   FChm.TempRawStream := FTempUncompressed;
   FChm.OnGetFileData := @RetrieveOtherFiles;
   FChm.OnLastFile := @LastFileAdded;
-  fchm.hasbinarytoc:=not nobinarytoc;;
-  fchm.hasbinaryindex:=not nobinaryindex;
+  fchm.hasbinarytoc:=not fnobintoc;;
+  fchm.hasbinaryindex:=not fnobinindex;
   ProcessOptions;
 
   FileStream := TMemoryStream.Create;