Explorar o código

Add "PosixHighDetect".

Martijn Laan hai 3 meses
pai
achega
9d2eca9562
Modificáronse 1 ficheiros con 4 adicións e 1 borrados
  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;