[Instantobjects-cvscommit] SF.net SVN: instantobjects: [622] trunk/Source/Core/InstantPersistence.pas

[<jcm...@us...>]

Revision: 622
Author:   jcmoraisjr
Date:     2006-02-23 06:14:00 -0800 (Thu, 23 Feb 2006)
ViewCVS:  http://svn.sourceforge.net/instantobjects?rev=622&view=rev

Log Message:
-----------
Fixed Info.Conflict assignment into TInstantSQLResolver.ExecuteStatement method.

Modified Paths:
--------------
    trunk/Source/Core/InstantPersistence.pas
Modified: trunk/Source/Core/InstantPersistence.pas
===================================================================
--- trunk/Source/Core/InstantPersistence.pas	2006-02-22 23:10:36 UTC (rev 621)
+++ trunk/Source/Core/InstantPersistence.pas	2006-02-23 14:14:00 UTC (rev 622)
@@ -13781,7 +13781,7 @@
   try
     Result := Broker.Execute(AStatement, AParams);
     Info.Success := Result >= 1;
-    Info.Conflict := not Info.Success or (ConflictAction = caIgnore);
+    Info.Conflict := not (Info.Success or (ConflictAction = caIgnore));
   except
     on EAbort do
       raise;