mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

FIX: cm_AddPlugin - case insensitive pluginst.inf check

Browse source
This commit is contained in:
Alexander Koblov 2023-08-13 15:09:56 +03:00
commit de65350e17
1 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/filesources/uarchivefilesourceutil.pas
View file

@ -361,7 +361,9 @@ begin
try
for Index:= 0 to AFiles.Count - 1 do
begin
if (AFiles[Index].Name = 'pluginst.inf') then
sPlugin:= AFiles[Index].Name;
if (Length(sPlugin) = 12) and (CompareText(sPlugin, 'pluginst.inf') = 0) then
begin
SourceFiles:= TFiles.Create(PathDelim);
SourceFiles.Add(AFiles[Index].Clone);
@ -374,9 +376,9 @@ begin
Operation.Free;
end;
if mbFileExists(Temp.GetRootDir + 'pluginst.inf') then
if mbFileExists(Temp.GetRootDir + sPlugin) then
begin
Ini:= TIniFileEx.Create(Temp.GetRootDir + 'pluginst.inf', fmOpenRead);
Ini:= TIniFileEx.Create(Temp.GetRootDir + sPlugin, fmOpenRead);
try
sFile:= Ini.ReadString('PluginInstall', 'File', EmptyStr);
sExt:= Ini.ReadString('PluginInstall', 'DefaultExtension', EmptyStr);