Index: TECH/MethodDefinition.cls.xml
===================================================================
diff -u -r350 -r750
--- TECH/MethodDefinition.cls.xml	(.../MethodDefinition.cls.xml)	(revision 350)
+++ TECH/MethodDefinition.cls.xml	(.../MethodDefinition.cls.xml)	(revision 750)
@@ -126,7 +126,7 @@
 		if ##class(TECH.StringUtils).StartsWith(LoweredPiece,"##class(") {
 			set ClassName = $piece($piece(Piece,"(",2),")")
 			do ..AddClassnameIfNeeded(ClassName)
-		} elseif Piece["_" {
+		} elseif (Piece["_")&&(Piece'[",") {
 			set ClassName = $replace(Piece,"_",".")
 			set ClassName = $piece(ClassName,"->",1)
 			set ClassName = $piece(ClassName,"""",1)
@@ -172,9 +172,9 @@
 <FormalSpec>ClassName:%String</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	#dim Needed As %Boolean = ##class(TECH.ClassUtils).IsOurs(ClassName)
+	#dim Needed As %Boolean = $length(ClassName)>0
+	if Needed set Needed = ##class(TECH.ClassUtils).IsOurs(ClassName)
 	if Needed set Needed = '..UsedClassNames.Find(ClassName)
-	
 	if Needed do ..UsedClassNames.Insert(ClassName)
 ]]></Implementation>
 </Method>