AbstractSourceCodeManager.st
changeset 4529 c8d82fe47b03
parent 4523 f07b5bcebde5
child 4530 01ab92876f9f
--- a/AbstractSourceCodeManager.st	Fri Dec 13 21:43:48 2019 +0100
+++ b/AbstractSourceCodeManager.st	Mon Dec 16 11:37:59 2019 +0100
@@ -2891,13 +2891,13 @@
 !
 
 knownTagsFor:aClass
-    "retrieve a list of symbolic tags known for that class.
+    "retrieve a colelction of symbolic tags known for that class.
      I.e. which tags/symbolic versions exist"
 
     |tagRevisionMapping tagList|
 
     tagRevisionMapping := self knownTagsAndRevisionsFor:aClass.
-    tagRevisionMapping isEmptyOrNil ifTrue:[^ tagRevisionMapping].
+    tagRevisionMapping isEmptyOrNil ifTrue:[^ #()].
     "/ ^ tagRevisionMapping keys
 
     "/ sort by revision; within same revision, sort by tag name