Index: svn/Merger.cls.xml
===================================================================
diff -u -r1801 -r1802
--- svn/Merger.cls.xml	(.../Merger.cls.xml)	(revision 1801)
+++ svn/Merger.cls.xml	(.../Merger.cls.xml)	(revision 1802)
@@ -32,7 +32,7 @@
 	do ..BlockServer("CACHEBUILD2010",RevisionRange)
 	
 	set Iterator = ##class(TECH.ListIterator).%New(##class(TECH.ListUtils).CompositeRangeStringToList(RevisionRange))
-	while Iterator.HasNext() {
+	while Iterator.HasNext() && $$$Not(..AbortMerge()) {
 		#dim Revision As %String = Iterator.Next()
 		do ..Console.Write($$$CRLF_Revision_"... ")		
 		do ..ExecMerge(Revision,From,To)