diff options
| author | andrew <andrew@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2009-10-26 00:50:15 +0000 |
|---|---|---|
| committer | andrew <andrew@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2009-10-26 00:50:15 +0000 |
| commit | 4bf391e63f3062df02c844d699a69aaa223ef044 (patch) | |
| tree | 16f7b0c55300aecec15258f53b18892b3ff9d326 /packages/chm | |
| parent | 23ef518160fa3bd7607e491a2893ee107143aff5 (diff) | |
| download | fpc-4bf391e63f3062df02c844d699a69aaa223ef044.tar.gz | |
* Fixed a chm reader bug that Return value was not initialized if neither binary or text index existed
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@13955 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/chm')
| -rw-r--r-- | packages/chm/src/chmreader.pas | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/packages/chm/src/chmreader.pas b/packages/chm/src/chmreader.pas index 3a72cb16bb..834e7808ad 100644 --- a/packages/chm/src/chmreader.pas +++ b/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); |
