--- a/Tools__NewSystemBrowser.st	Thu Sep 22 16:29:42 2022 +0100
+++ b/Tools__NewSystemBrowser.st	Wed Oct 05 11:57:26 2022 +0100
@@ -24492,6 +24492,13 @@
     "Created: / 29-05-2012 / 10:26:41 / cg"
 !
 
+enqueueDelayedUpdatePackageInfo
+    self enqueueMessage:#updatePackageInfo
+
+    "Created: / 14-01-2019 / 18:08:56 / Claus Gittinger"
+    "Modified: / 16-03-2019 / 14:12:59 / Claus Gittinger"
+!
+
 enqueueDelayedUpdateTestRunnerVisibility
     ^ self
         enqueueMessage:#updateTestRunnerVisibility
@@ -24813,12 +24820,12 @@
 
             method := self theSingleSelectedMethod.
             method notNil ifTrue:[
-                self updatePackageInfoForMethod: method.
+                class := method mclass.
             ] ifFalse:[
                 class :=  self theSingleSelectedClass.
-                class notNil ifTrue:[
-                    self updatePackageInfoForClass: class.
-                ]
+            ].
+            (aParameter isNil or:[class notNil and:[class name = aParameter first name]]) ifTrue: [ 
+                 self enqueueDelayedUpdatePackageInfo.
             ].
         ].
 
@@ -24829,6 +24836,7 @@
 
     "Modified: / 27-07-2012 / 22:17:08 / cg"
     "Modified: / 24-02-2014 / 23:33:05 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 05-10-2022 / 11:54:34 / Jan Vrany <jan.vrany@labware.com>"
 !
 
 updateBookmarkHolder
@@ -25043,6 +25051,20 @@
             value:(self hasPackagableApplicationSelected)
 !
 
+updatePackageInfo
+    | method class |
+
+    (method := self theSingleSelectedMethod) notNil ifTrue:[
+        self updatePackageInfoForMethod: method.
+    ] ifFalse:[
+        (class := self theSingleSelectedClass) notNil ifTrue:[
+            self updatePackageInfoForClass:class.
+        ]
+    ].
+
+    "Created: / 14-01-2019 / 18:08:38 / Claus Gittinger"
+!
+
 updatePluginVisibility
     |naviState pluginVisible  frame  pluginApp  pluginView |