Index: svn/Helper.cls.xml
===================================================================
diff -u -r1872 -r1875
--- svn/Helper.cls.xml	(.../Helper.cls.xml)	(revision 1872)
+++ svn/Helper.cls.xml	(.../Helper.cls.xml)	(revision 1875)
@@ -528,10 +528,14 @@
 			while itsvnResults.HasNext() {
 				#dim svnInfo As svn.CommandResult = itsvnResults.Next()
 				if (svnInfo.Action'="P") && (svnInfo.Action'="X") {
-					if (##class(TECH.StringUtils).StartsWith($$$LCase(svnInfo.ExternalName),"gelist","changelist")) {
+					#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(svnInfo.ExternalName_" : "_svnInfo.Action _ $C(9))
+					do MailBody.WriteLine(ExternalName_" : "_svnInfo.Action _ $C(9))
 				}
 			}
 		}