Index: svn/Helper.cls.xml
===================================================================
diff -u -r1846 -r1875
--- svn/Helper.cls.xml	(.../Helper.cls.xml)	(revision 1846)
+++ svn/Helper.cls.xml	(.../Helper.cls.xml)	(revision 1875)
@@ -528,7 +528,14 @@
 			while itsvnResults.HasNext() {
 				#dim svnInfo As svn.CommandResult = itsvnResults.Next()
 				if (svnInfo.Action'="P") && (svnInfo.Action'="X") {
-					do MailBody.WriteLine(svnInfo.ExternalName_" : "_svnInfo.Action)
+					#dim ExternalName As %String = svnInfo.ExternalName
+					if (##class(TECH.StringUtils).StartsWith($$$LCase(ExternalName),"gelist")) {
+						Set ExternalName = "changelist" _ $Extract(ExternalName, 7, *)
+					}
+					if (##class(TECH.StringUtils).StartsWith($$$LCase(ExternalName),"changelist")) {
+						do MailBody.WriteLine()
+					}
+					do MailBody.WriteLine(ExternalName_" : "_svnInfo.Action _ $C(9))
 				}
 			}
 		}