From 92db5a273ed40d00256d038c451ea7c339bc2b8a Mon Sep 17 00:00:00 2001
From: Mark van Renswoude <mark@x2software.net>
Date: Tue, 15 Feb 2005 15:03:45 +0000
Subject: [PATCH] Fixed: syntax error

---
 X2UtStrings.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/X2UtStrings.pas b/X2UtStrings.pas
index 9157bc2..1660543 100644
--- a/X2UtStrings.pas
+++ b/X2UtStrings.pas
@@ -376,7 +376,7 @@ begin
   AParent := ExcludeTrailingPathDelimiter(ExpandFileName(AParent));
   Result  := SameTextS(AChild, AParent) and
              ((not AFailIfSame) or
-              (Length(AChild) > Length(AParent));
+              (Length(AChild) > Length(AParent)));
 end;
 
 end.