Index: TECH/ClassUtils.cls.xml
===================================================================
diff -u -r697 -r736
--- TECH/ClassUtils.cls.xml	(.../ClassUtils.cls.xml)	(revision 697)
+++ TECH/ClassUtils.cls.xml	(.../ClassUtils.cls.xml)	(revision 736)
@@ -95,7 +95,8 @@
 <ClassMethod>1</ClassMethod>
 <FormalSpec>Classname:%String</FormalSpec>
 <Implementation><![CDATA[
-	#dim IsOurs As %Boolean = '##class(TECH.StringUtils).StartsWith(Classname,"%")
+	#dim IsOurs As %Boolean = ( $length(Classname)>0 )
+	if IsOurs set IsOurs = '##class(TECH.StringUtils).StartsWith(Classname,"%")
 	if IsOurs set IsOurs = ##class(%Dictionary.ClassDefinition).%ExistsId(Classname)
 	if IsOurs {
 		set ClassDefinition = ##class(%Dictionary.ClassDefinition).%OpenId(Classname)