Index: TECH/ListUtils.cls.xml
===================================================================
diff -u -r1896 -r1940
--- TECH/ListUtils.cls.xml	(.../ListUtils.cls.xml)	(revision 1896)
+++ TECH/ListUtils.cls.xml	(.../ListUtils.cls.xml)	(revision 1940)
@@ -76,14 +76,14 @@
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim Pieces As %String = ""
-	while (Iterator.HasNext() && ($L(Pieces) < 15000)) {
+	while (Iterator.HasNext()) {
 		#dim Item As %String = Iterator.Next()
+
 		set Pieces = Pieces _ Item
 		If Iterator.HasNext() {
 			Set Pieces = Pieces_Delim
 		}
 	}
-
 	quit Pieces
 ]]></Implementation>
 </Method>