# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1363887355 -3600
# Node ID e8a9f796d598c12b391ab476bda8e38a11baa28c
# Parent  e61e4a6fb317f4454778c7d863385aecfe2cb3c3
class: Tools::ObjectModuleInformation
comment/format in: #browseModule

diff -r e61e4a6fb317 -r e8a9f796d598 Tools__ObjectModuleInformation.st
--- a/Tools__ObjectModuleInformation.st	Thu Mar 21 18:30:30 2013 +0100
+++ b/Tools__ObjectModuleInformation.st	Thu Mar 21 18:35:55 2013 +0100
@@ -1197,7 +1197,8 @@
         classes := moduleInfoOrHandle classNames collect:[:nm | Smalltalk classNamed:nm].
         UserPreferences systemBrowserClass 
             browseClasses:classes
-            label:(resources string:'Classes in %1' with:moduleInfoOrHandle libraryName)
+            label:(resources string:'Classes in %1' with:moduleInfoOrHandle libraryName).
+        "/ Q: what about extensions ?
     ] ifFalse:[
         moduleInfoOrHandle isMethodHandle ifTrue:[
             method := moduleInfoOrHandle method.