FIX: Bug [0001296] "Sorting by file type cannot be reversed"

This commit is contained in:
Alexander Koblov 2016-02-06 11:13:37 +00:00
commit eefc03e33c

View file

@ -683,8 +683,11 @@ begin
fsfNameNoExtension:
Result := ICompareByNameNoExt(File1, File2, bNegative);
fsfType:
Result := mbCompareText(File1.TypeProperty.Value,
File2.TypeProperty.Value);
begin
Result := mbCompareText(File1.TypeProperty.Value,
File2.TypeProperty.Value);
if bNegative then Result := -Result;
end;
end;
if Result <> 0 then