From b2e39fd6de0767f35d4f9be34094706fd51d9513 Mon Sep 17 00:00:00 2001
From: Tomas Bzatek <tbzatek@users.sourceforge.net>
Date: Fri, 5 Aug 2011 18:27:27 +0200
Subject: Fix more occurrences of Inc()

---
 UMain.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/UMain.pas b/UMain.pas
index 703f197..252e557 100644
--- a/UMain.pas
+++ b/UMain.pas
@@ -2014,11 +2014,11 @@ begin
     for i := 0 to DataList.Count - 1 do begin
       Data := DataList[i];
       if (not Data^.UpDir) and ((not Data^.IsDir) or (Data^.IsDir and (Data^.Size > 0))) then begin
-        Inc(TotalSize, Data^.Size);
+        TotalSize := TotalSize + Data^.Size;
         if not Data^.IsDir then Inc(TotalFiles);
         if Data^.Selected then begin
           if not Data^.IsDir then Inc(NumSel);
-          Inc(Size, Data^.Size);
+          Size := Size + Data^.Size;
         end;
       end;
     end;
-- 
cgit v1.2.3