* Fixed a chm reader bug that Return value was not initialized if neither binary or text index existed

git-svn-id: trunk@13955 -

packages/chm/src/chmreader.pas

@@ -930,6 +930,7 @@ var Index   : TMemoryStream;
 function  AbortAndTryTextual:tchmsitemap;
 
 begin
+     Result := nil;
      if Assigned(Index) Then Index.Free;
      // Second Try text Index
      Index := GetObject(IndexFile);