Browse Source

Add "PosixHighDetect".

Martijn Laan 3 months ago
parent
commit
9d2eca9562
1 changed files with 4 additions and 1 deletions
  1. 4 1
      Projects/Src/Compression.SevenZipDLLDecoder.pas

+ 4 - 1
Projects/Src/Compression.SevenZipDLLDecoder.pas

@@ -331,8 +331,11 @@ begin
         outStream := nil;
       end else begin
         var Attrib: DWORD;
-        if GetProperty(index, kpidAttrib, Attrib) then
+        if GetProperty(index, kpidAttrib, Attrib) then begin
+          if Attrib and $F0000000 <> 0 then
+            Attrib := Attrib and $3FFF; { "PosixHighDetect", just like FileDir.cpp and similar to 7zMain.c }
           FCurrent.SetAttrib(Attrib);
+        end;
         if not FFullPaths then
           Path := PathExtractName(Path);
         FCurrent.Path := Path;