From da016e25fd242afdf83aa47d4f24eb55ef5faf02 Mon Sep 17 00:00:00 2001
From: tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Thu, 23 Jul 2009 20:22:58 +0000
Subject: GarbageList.Count >= GarbageMaxCount
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/experimental@1907 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
unicode/src/base/UPath.pas | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/unicode/src/base/UPath.pas b/unicode/src/base/UPath.pas
index a8743470..975fcb6f 100644
--- a/unicode/src/base/UPath.pas
+++ b/unicode/src/base/UPath.pas
@@ -582,7 +582,7 @@ begin
Unify(DelimOption);
{$IFDEF HAVE_REFCNTBUG}
GarbageList.Lock;
- if (GarbageList.Count > GarbageMaxCount) then
+ if (GarbageList.Count >= GarbageMaxCount) then
begin
while (GarbageList.Count > GarbageAfterCleanCount) do
GarbageList.Delete(0);
--
cgit v1.2.3