Index: TECH/ListUtils.cls.xml
===================================================================
diff -u -r1561 -r1562
--- TECH/ListUtils.cls.xml	(.../ListUtils.cls.xml)	(revision 1561)
+++ TECH/ListUtils.cls.xml	(.../ListUtils.cls.xml)	(revision 1562)
@@ -457,7 +457,7 @@
 		#dim i As TECH.Integer
 		For i = 2:1:Lijst.Count() {
 			#dim HulpWaarde As %CacheString = Lijst.GetAt(i)
-			If (..ComparatorValidator(HulpWaarde,Extrema, Comparator, IsMaximum)) {
+			If (..ExtremaComparatorValidator(HulpWaarde,Extrema, Comparator, IsMaximum)) {
 				Set Extrema = HulpWaarde	
 			}
 		}
@@ -466,7 +466,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="ComparatorValidator">
+<Method name="ExtremaComparatorValidator">
 <ClassMethod>1</ClassMethod>
 <FormalSpec>Waarde1:%CacheString,Waarde2:%CacheString,Comparator:TECH.Comparator.IComparator,IsMaximum:%Boolean</FormalSpec>
 <Language>basic</Language>