--- a/AbstractSourceCodeManager.st	Mon Dec 04 23:49:38 2017 +0100
+++ b/AbstractSourceCodeManager.st	Tue Dec 05 15:49:48 2017 +0100
@@ -2749,8 +2749,7 @@
 !
 
 knownTagsAndRevisionsFor:aClass
-    "retrieve a list of symbolic tags -> versionNr associations
-     known for that class.
+    "retrieve a list of (symbolic tags -> versionNr) associations known for that class.
      I.e. which tags/symbolic versions exist, and which revision-nr is attached to it"
 
     |log|
@@ -2764,7 +2763,35 @@
     ].
     ^ (log at:#symbolicNames ifAbsent:[ #() ]).
 
+    "
+     CVSSourceCodeManager knownTagsAndRevisionsFor:Array
+    "
+
     "Created: / 08-02-2011 / 10:18:00 / cg"
+    "Modified (comment): / 05-12-2017 / 12:46:14 / cg"
+!
+
+knownTagsAndRevisionsForContainer:fileName directory:packageDir module:moduleDir
+    "retrieve a list of (symbolic tags -> versionNr) associations.
+     I.e. which tags/symbolic versions exist, and which revision-nr is attached to it"
+
+    |log|
+
+    log := self revisionLogOf:nil numberOfRevisions:20 fileName:fileName directory:packageDir module:moduleDir.
+    log isNil ifTrue:[
+        SourceCodeManagerError 
+            raiseRequestWith:fileName
+            errorString: 'Could not fetch log (cvs connection error?)'.
+        ^ #()
+    ].
+    ^ (log at:#symbolicNames ifAbsent:[ #() ]).
+
+    "
+     CVSSourceCodeManager knownTagsAndRevisionsForContainer:'Make.proto' directory:'libbasic' module:'stx'
+    "
+
+    "Created: / 05-12-2017 / 01:16:09 / cg"
+    "Modified (comment): / 05-12-2017 / 12:45:47 / cg"
 !
 
 knownTagsFor:aClass