From 9883e3b4eec8e457b49cb70ca006f5f7601332da Mon Sep 17 00:00:00 2001
From: Tomas Bzatek <tbzatek@users.sourceforge.net>
Date: Sun, 29 Nov 2009 13:31:03 +0100
Subject: Introduce inode_no property

---
 UEngines.pas | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'UEngines.pas')

diff --git a/UEngines.pas b/UEngines.pas
index cc0e1f3..a8f1923 100644
--- a/UEngines.pas
+++ b/UEngines.pas
@@ -47,6 +47,7 @@ type
     ColumnData: array[0..9] of PChar;
     Size: cuLongLong;
     PackedSize: Int64;
+    inode_no: cuLong;
     UpDir: boolean;
     Mode, UID, GID: cuLong;
     IsDir, IsLnk, IsBlk, IsChr, IsFIFO, IsSock: boolean;
@@ -318,6 +319,7 @@ begin
   Item^.GID := StatBuf^.st_gid;
   Item^.Size := StatBuf^.st_size;
   Item^.PackedSize := -1;
+  Item^.inode_no := StatBuf^.st_ino;
   libc_free(StatBuf);
 
   if Item^.IsLnk then begin
-- 
cgit v1.2.3