--- a/Tools__TagList.st	Wed Jun 24 00:24:37 2015 +0200
+++ b/Tools__TagList.st	Thu Jun 25 13:07:29 2015 +0200
@@ -3977,7 +3977,7 @@
 
     l := line withoutSeparators.
 
-    ((l startsWith:'<xsd:complexType ') or:[l startsWith:'<xsd:simpleType ']) ifTrue:[
+    ((l includesString:':complexType ') or:[l includesString:':simpleType ']) ifTrue:[
         i1 := l findString:'name="'.        
         i1 ~~ 0 ifTrue:[
             nm := l copyFrom:(i1 + 'name="' size).
@@ -3990,7 +3990,7 @@
                             lineNumber:lineNr).
         ].
     ].
-    (l startsWith:'<xsd:element ') ifTrue:[
+    (l includesString:':element ') ifTrue:[
         i1 := l findString:'name="'.        
         i1 ~~ 0 ifTrue:[
             nm := l copyFrom:(i1 + 'name="' size).