Consolidate plugin IDs

This breaks custom-chosen plugins for saved connections (with automatic fallback to 'auto')

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;