AbstractSourceCodeManager.st
changeset 2528 fb5b84f165d4
parent 2527 a466b74c0db4
child 2529 302c2c58caa7
--- a/AbstractSourceCodeManager.st	Tue Sep 27 18:10:26 2011 +0200
+++ b/AbstractSourceCodeManager.st	Thu Sep 29 14:36:34 2011 +0200
@@ -1407,11 +1407,27 @@
 !
 
 nameOfVersionMethodForExtensions
+    "that is the old name; now, we use extensionsVersion_<SCM>"
+
     ^ #'extensionsVersion'
+
+    "Modified (comment): / 29-09-2011 / 13:27:04 / cg"
 !
 
 nameOfVersionMethodInClasses
+    "that is the old name; now, we use version_<SCM>"
+
     ^ #'version'
+
+    "Modified (comment): / 29-09-2011 / 13:27:09 / cg"
+!
+
+prefixOfVersionMethodSelector
+    "all scm-version methods start with this prefix"
+
+    ^ 'version_'
+
+    "Created: / 29-09-2011 / 13:26:29 / cg"
 !
 
 settingsApplicationClass
@@ -1977,7 +1993,7 @@
 
     doubleColon := source indexOf: $: startingAt: startQuote + 2.
     "/There may be no double colon at all, if the version method
-    "/is fresh, like '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.256 2011-09-27 16:10:26 vrany Exp $'
+    "/is fresh, like '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.257 2011-09-29 12:36:34 cg Exp $'
     (doubleColon == 0 or:[doubleColon > endQuote]) ifTrue:[
         doubleColon := endQuote - 1.
     ].
@@ -3166,7 +3182,7 @@
 !AbstractSourceCodeManager class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.256 2011-09-27 16:10:26 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.257 2011-09-29 12:36:34 cg Exp $'
 ! !
 
 AbstractSourceCodeManager initialize!