Browse Source

--- Merging r15520 into '.':
U packages/chm/src/chmreader.pas

# revisions: 15520
------------------------------------------------------------------------
r15520 | marco | 2010-07-03 19:10:20 +0200 (Sat, 03 Jul 2010) | 2 lines
Changed paths:
M /trunk/packages/chm/src/chmreader.pas

* Remove leading / from LookupTopicByID. Mantis 16688 patch by Zilvinas Ledas.

------------------------------------------------------------------------

git-svn-id: branches/fixes_2_4@15522 -

marco 15 years ago
parent
commit
a49cc51368
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/chm/src/chmreader.pas

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

@@ -472,7 +472,7 @@ begin
   fURLSTRStream.ReadDWord;
   fURLSTRStream.ReadDWord;
   if fURLSTRStream.Position < fURLSTRStream.Size-1 then
-    Result := '/'+PChar(fURLSTRStream.Memory+fURLSTRStream.Position);
+    Result := PChar(fURLSTRStream.Memory+fURLSTRStream.Position);
 end;
 
 function TChmReader.CheckCommonStreams: Boolean;