--- a/Tools__ObjectModuleInformation.st	Thu Oct 15 18:07:30 2009 +0200
+++ b/Tools__ObjectModuleInformation.st	Thu Oct 15 18:08:27 2009 +0200
@@ -266,6 +266,11 @@
                   itemValue: browseModuleExtensions
                   translateLabel: true
                 )
+         (MenuItem
+            label: 'Find a Class...'
+            itemValue: findClass
+            translateLabel: true
+          )
                (MenuItem
                   label: '-'
                 )