From b4a479a691069a0293754fa94922b77ca406fea7 Mon Sep 17 00:00:00 2001
From: Tomas Bzatek <tbzatek@users.sourceforge.net>
Date: Sat, 15 Nov 2008 16:22:51 +0100
Subject: VFS: Compressed size display support

---
 vfs/UVFSCore.pas | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'vfs/UVFSCore.pas')

diff --git a/vfs/UVFSCore.pas b/vfs/UVFSCore.pas
index a514512..270b240 100644
--- a/vfs/UVFSCore.pas
+++ b/vfs/UVFSCore.pas
@@ -596,6 +596,7 @@ begin
       UID := P^.iUID;
       GID := P^.iGID;
       Size := P^.iSize;
+      PackedSize := P^.iPackedSize;
       libc_free(P);
    end;
    Result := Item;
@@ -658,6 +659,7 @@ var Item: PDataItemSL;
       UID := P^.iUID;
       GID := P^.iGID;
       Size := P^.iSize;
+      PackedSize := P^.iPackedSize;
       Level := ALevel + Ord(not AddCurrDirStage);
     end;
     if AddCurrDirStage then List.Add(Item)
-- 
cgit v1.2.3