ChangeSetDiffSet.st
branchjv
changeset 3030 f89aa3cfedde
parent 3012 4f40b8304d54
child 3042 48e76977cdc3
--- a/ChangeSetDiffSet.st	Fri Mar 16 16:51:41 2012 +0000
+++ b/ChangeSetDiffSet.st	Mon Mar 19 15:30:00 2012 +0000
@@ -236,12 +236,20 @@
 
     "Created: / 25-11-2009 / 20:37:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 09-12-2009 / 17:43:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+isMerged
+    "raise an error: must be redefined in concrete subclass(es)"
+
+    ^ self diffs allSatisfy:[:e|e isMerged].
+
+    "Created: / 19-03-2012 / 15:15:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !ChangeSetDiffSet class methodsFor:'documentation'!
 
 version
-    ^ '$Id: ChangeSetDiffSet.st 1872 2012-01-30 17:19:14Z vranyj1 $'
+    ^ '$Id: ChangeSetDiffSet.st 1896 2012-03-19 15:30:00Z vranyj1 $'
 !
 
 version_CVS
@@ -249,5 +257,5 @@
 !
 
 version_SVN
-    ^ '$Id: ChangeSetDiffSet.st 1872 2012-01-30 17:19:14Z vranyj1 $'
+    ^ '$Id: ChangeSetDiffSet.st 1896 2012-03-19 15:30:00Z vranyj1 $'
 ! !