--- a/SettingsDialog.st	Fri Aug 15 11:33:22 2003 +0200
+++ b/SettingsDialog.st	Fri Aug 15 11:38:00 2003 +0200
@@ -1223,12 +1223,7 @@
 
     <resource: #programMenu >
 
-    |menu|
-    menu := self application middleButtonMenu.
-    menu notNil ifTrue:[
-        menu receiver:self application settingsDialog.
-    ].
-    ^ menu
+    ^ self application middleButtonMenu
 ! !
 
 !SettingsDialog::HierarchicalApplicationList::ApplicationItem methodsFor:'printing & storing'!
@@ -1253,7 +1248,7 @@
 !SettingsDialog class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.36 2003-08-15 09:33:22 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.37 2003-08-15 09:38:00 penk Exp $'
 ! !
 
 SettingsDialog initialize!