--- a/AbstractSourceCodeManager.st	Mon Oct 29 13:21:49 2012 +0100
+++ b/AbstractSourceCodeManager.st	Mon Oct 29 15:28:32 2012 +0100
@@ -2737,6 +2737,23 @@
     "Modified (comment): / 23-12-2011 / 19:03:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
+revisionForTag:tagName inClass:aClass
+    "retrieve the revision number associated to a particular tag/symbolic version.
+     Nil if unknown"
+
+    |tagsAndVersions|
+
+    tagsAndVersions := self knownTagsAndRevisionsFor:aClass.
+    tagsAndVersions isEmptyOrNil ifTrue:[ ^ nil ].
+    ^ tagsAndVersions at:tagName ifAbsent:nil.
+
+    "
+     SourceCodeManager revisionForTag:'stable' inClass:Array
+    "
+
+    "Created: / 08-02-2011 / 10:18:00 / cg"
+!
+
 revisionInfoFromRCSString:aString
     "{ Pragma: +optSpace }"
 
@@ -3784,11 +3801,11 @@
 !AbstractSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.301 2012-10-29 12:21:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.302 2012-10-29 14:28:32 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.301 2012-10-29 12:21:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.302 2012-10-29 14:28:32 cg Exp $'
 !
 
 version_SVN