--- a/AbstractSourceCodeManager.st Wed Sep 26 18:09:58 2012 +0200
+++ b/AbstractSourceCodeManager.st Wed Sep 26 18:16:18 2012 +0200
@@ -1616,6 +1616,15 @@
"Created: / 26-09-2012 / 18:09:36 / cg"
!
+isRevision:revision1 sameOrAfter:revision2
+ "true, if the dotted revision string revision1 is >= than revision2"
+
+ revision1 = revision2 ifTrue:[^ true].
+ ^ self isRevision:revision1 after:revision2
+
+ "Created: / 26-09-2012 / 18:15:58 / cg"
+!
+
isVersionMethodForExtensionsSelector: selector
"true if the given selector is for one of the manager's extensions version methods.
These are all named extensionVersion_XXX, where XXX is manager-specific (CVS, P4, SVN etc.).
@@ -3774,11 +3783,11 @@
!AbstractSourceCodeManager class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.297 2012-09-26 16:09:58 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.298 2012-09-26 16:16:18 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.297 2012-09-26 16:09:58 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.298 2012-09-26 16:16:18 cg Exp $'
!
version_SVN