From cb7efbd2493720e3129695ce72df3ee4190e9086 Mon Sep 17 00:00:00 2001
From: Tomas Bzatek <tbzatek@users.sourceforge.net>
Date: Mon, 5 Oct 2009 21:19:12 +0200
Subject: Don't count directories in panel statusbar

---
 UMain.pas | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/UMain.pas b/UMain.pas
index 6154fda..80f22f2 100644
--- a/UMain.pas
+++ b/UMain.pas
@@ -2045,11 +2045,11 @@ begin
   if DataList.Count > 0 then
     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 > -1))) then begin
+      if (not Data^.UpDir) and ((not Data^.IsDir) or (Data^.IsDir and (Data^.Size > 0))) then begin
         Inc(TotalSize, Data^.Size);
-        Inc(TotalFiles);
+        if not Data^.IsDir then Inc(TotalFiles);
         if Data^.Selected then begin
-          Inc(NumSel);
+          if not Data^.IsDir then Inc(NumSel);
           Inc(Size, Data^.Size);
         end;
       end;
-- 
cgit v1.2.3