Index: vhUnitTest/TECH/KeyValue/UniqueList/RemoveByKey/Test.cls.xml
===================================================================
diff -u -r3596 -r3597
--- vhUnitTest/TECH/KeyValue/UniqueList/RemoveByKey/Test.cls.xml	(.../Test.cls.xml)	(revision 3596)
+++ vhUnitTest/TECH/KeyValue/UniqueList/RemoveByKey/Test.cls.xml	(.../Test.cls.xml)	(revision 3597)
@@ -27,6 +27,7 @@
 	
 	Do $$$AssertEquals(KeyValueList.Count(),"2")
 	Do $$$AssertTrue($$$ISOK(KeyValueList.RemoveByKey("Key1")),"")
+	Do $$$AssertIsObject(KeyValueList.FindByKey("Key2"),"")
 	Do $$$AssertEquals(KeyValueList.Count(),"1")
 ]]></Implementation>
 </Method>