diff options
Diffstat (limited to 'USearch.pas')
| -rw-r--r-- | USearch.pas | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/USearch.pas b/USearch.pas index 4339f5e..808027d 100644 --- a/USearch.pas +++ b/USearch.pas @@ -592,7 +592,7 @@ begin if b then Break; end; if b then begin - DebugMsg(['Found plugin ''', Plugin.VFSName, ''', trying to open the archive ''', archive, '''']); + DebugMsg(['Found plugin ''', Plugin.ModuleID, ''', trying to open the archive ''', archive, '''']); AEngine := TVFSEngine.Create(Plugin); (AEngine as TVFSEngine).ArchiveMode := True; b := b and ((AEngine as TVFSEngine).VFSOpenEx(archive, nil, nil, nil, nil) = 0); @@ -988,7 +988,7 @@ begin if (not Data^.IsDir) and FSearchArchives and (not (FEngine is TVFSEngine)) then begin Plugin := FindVFSPlugin(FileName); if Plugin <> nil then begin - DebugMsg(['Found plugin ''', Plugin.VFSName, ''', trying to open the archive ''', FileName, '''']); + DebugMsg(['Found plugin ''', Plugin.ModuleID, ''', trying to open the archive ''', FileName, '''']); xEngine := TVFSEngine.Create(Plugin); xEngine.ParentEngine := FEngine; xEngine.ArchiveMode := True; |