From: ShadowFlare <blakflare@hotmail.com>
Date: Mon, 24 Aug 2009 12:28:33 +0000 (-0600)
Subject: Fixed no listing bug on archives having a one entry hash table.
X-Git-Url: https://sfsrealm.hopto.org/projects/?a=commitdiff_plain;h=28dddd23f4f552954a63d8f5fbe2d5af97d4c987;p=WinMPQ.git

Fixed no listing bug on archives having a one entry hash table.
---

diff --git a/MpqStuff.bas b/MpqStuff.bas
index cf836a1..971d029 100644
--- a/MpqStuff.bas
+++ b/MpqStuff.bas
@@ -302,7 +302,7 @@ StartSearch:
     If Right(NewFileLists, 2) = vbCrLf Then NewFileLists = Left(NewFileLists, Len(NewFileLists) - 2)
 End If
 nHashEntries = SFileGetFileInfo(hMPQ, SFILE_INFO_HASH_TABLE_SIZE)
-If nHashEntries - 1 < 1 Then Exit Function
+If nHashEntries - 1 < 0 Then Exit Function
 ReDim ListedFiles(nHashEntries - 1)
 sListFiles = SFileListFiles(hMPQ, NewFileLists, ListedFiles(0), 0)
 End Function