Index: Tools/Test/Report.cls.xml
===================================================================
diff -u -r2162 -r2163
--- Tools/Test/Report.cls.xml	(.../Report.cls.xml)	(revision 2162)
+++ Tools/Test/Report.cls.xml	(.../Report.cls.xml)	(revision 2163)
@@ -248,7 +248,7 @@
  . If ..IsSuccess(namespace,index,suite) { Set status="Passed", styleClass="goed" } Else {Set status="Failed",styleClass="fout" }
  . If +result
  . If    &html<<td class="#(styleClass)#">#(status)#</td>>
- . Else  &html<<td class="#(styleClass)#">#(status_"<br>"_$p(result,"~",2,99))#</td>>
+ . Else  &html<<td class="#(styleClass)#">#(status_"<br>"_$tr($p(result,"~",2,99),"~",":"))#</td>>
  . &html<</tr>>
  &html<</table>>
  Quit $$$OK
@@ -303,7 +303,7 @@
  . . If ..IsSuccess(namespace,index,suite,case) { Set color="green",status="Passed" } Else { Set color="red",status="Failed"}
  . . If +result
  . . If    &html<<td align=left><font color="#(color)#"><b>#(status)#</b></font></td>>
- . . Else  &html<<td align=left><font color="#(color)#"><b>#(status_"<br>"_$p(result,"~",2,99))#</b></font></td>>
+ . . Else  &html<<td align=left><font color="#(color)#"><b>#(status_"<br>"_$tr($p(result,"~",2,99),"~",":"))#</b></font></td>>
  . . &html<<td align=left><b>>
  . . If $data(@GlobalForTimings@(index,case))  Do
  . . . &html<<div DIV STYLE="width: #(@GlobalForTimings@(index,case)*50)#; background-color: lightgray">#($tr(@GlobalForTimings@(index,case),".",","))#</div>>
@@ -353,7 +353,7 @@
  . If ..IsSuccess(namespace,index,suite,case,method) { Set color="green",status="Passed" } Else { Set color="red",status="Failed" }
  . If +result
  . If    &html<<td align=left><font color="#(color)#"><b>#(status)#</b></font></td>>
- . Else  &html<<td align=left><font color="#(color)#"><b>#(status_"<br>"_$p(result,"~",2,99))#</b></font></td>>
+ . Else  &html<<td align=left><font color="#(color)#"><b>#(status_"<br>"_$tr($p(result,"~",2,99),"~",":"))#</b></font></td>>
  . &html<</tr>>
  &html<</table>>
  Quit $$$OK
@@ -387,7 +387,7 @@
  . Set result=@GlobalForLogging@(index,suite,case,method,action)
  . &html<<tr>>
  . &html<<td valign=top>#($p(result,"~",2))#</td>>
- . &html<<td valign=top>#($p(result,"~",3,99))#</td>>
+ . &html<<td valign=top>#($tr($p(result,"~",3,99),"~",":"))#</td>>
  . If ..IsSuccess(namespace,index,suite,case,method,action) { Set color="green",status="Passed" } Else { Set color="red",status="Failed" }
  . &html<<td valign=top align=center><font color="#(color)#"><b>#(status)#</b></font></td>>
  . &html<</tr>>
Index: Tools/Test/Manager.cls.xml
===================================================================
diff -u -r2162 -r2163
--- Tools/Test/Manager.cls.xml	(.../Manager.cls.xml)	(revision 2162)
+++ Tools/Test/Manager.cls.xml	(.../Manager.cls.xml)	(revision 2163)
@@ -398,8 +398,8 @@
  Set method=i%TheStack(i%TheStack,"method")
  If method="" Quit
  Set next=$o(i%TheLog(suite,case,method,""),-1)+1
- Set i%TheLog(suite,case,method,next)=success_":"_case_":"_method_":"_action_":"_description
- Set line=action_":"_description_" ("_$s(success:"passed",1:"failed")_")"
+ Set i%TheLog(suite,case,method,next)=success_"~"_case_"~"_method_"~"_action_"~"_description
+ Set line=action_"~"_description_" ("_$s(success:"passed",1:"failed")_")"
  Do ..PrintLine(line,4)
  If 'success Do ..PrintErrorLine(line)
  Quit