[Jcframework-commits] Nunit/InheritedClasses AtomsFrameworkTests.vb,1.16,1.17

[Richard B. <rb...@us...>]

Update of /cvsroot/jcframework/Nunit/InheritedClasses
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16325/InheritedClasses

Modified Files:
	AtomsFrameworkTests.vb 
Log Message:
Extra tests for caching objects with event listeners.

Index: AtomsFrameworkTests.vb
===================================================================
RCS file: /cvsroot/jcframework/Nunit/InheritedClasses/AtomsFrameworkTests.vb,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -d -r1.16 -r1.17
--- AtomsFrameworkTests.vb	1 Apr 2005 00:00:10 -0000	1.16
+++ AtomsFrameworkTests.vb	4 Apr 2005 23:59:52 -0000	1.17
@@ -213,6 +213,24 @@
 			Assert.IsTrue(emp.Persistent)
 		End Sub
 
+		<Test()> Public Sub CacheTest2()
+			'Check that local object changes don't impact the cache
+			emp.Name = "Initial2"
+			emp.Find()
+			Assert.IsFalse(emp.Persistent)
+			emp.Save()
+			pbroker.ClearCache()
+			emp = New CEmployee
+			emp.Name = "Initial2"
+			emp.Find()
+			'Change local copy
+			emp.Name = "Final"
+			emp = New CEmployee
+			emp.Name = "Initial2"
+			emp.Find()
+			Assert.AreEqual("Initial2", emp.Name)
+		End Sub
+
 		<Test()> Public Sub AutoDelete()
 			Dim a As New TableA
 			Dim b As New TableB