Index: Tools/Test/Manager.cls.xml
===================================================================
diff -u -r2816 -r2818
--- Tools/Test/Manager.cls.xml	(.../Manager.cls.xml)	(revision 2816)
+++ Tools/Test/Manager.cls.xml	(.../Manager.cls.xml)	(revision 2818)
@@ -312,7 +312,7 @@
 	
 	if IsValid {
 		#dim LastPart = ##class(TECH.StringUtils).GetLastPart(ClassName,".")
-		set:##class(TECH.StringUtils).MatchesPattern(LastPart,..StoryPattern) IsValid = +$get(^SYS("RunAcceptanceTest",LastPart))	
+		set:##class(TECH.StringUtils).MatchesPattern(LastPart,"§"_..StoryPattern) IsValid = +$get(^SYS("RunAcceptanceTest",LastPart))	
 	}
 	quit IsValid
 ]]></Implementation>