#REFACTORING by stefan
authorStefan Vogel <sv@exept.de>
Wed, 12 Oct 2016 15:17:45 +0200
changeset 16931 8da61202e106
parent 16930 1db8f8610422
child 16932 ee4386e43274
#REFACTORING by stefan class: NewLauncher removed: #systemBrowserItemVisible changed: #menuToolbar
NewLauncher.st
--- a/NewLauncher.st	Wed Oct 12 15:03:11 2016 +0200
+++ b/NewLauncher.st	Wed Oct 12 15:17:45 2016 +0200
@@ -2371,7 +2371,6 @@
             itemValue: openApplication:
             nameKey: systemBrowser
             isButton: true
-            isVisible: systemBrowserItemVisible
             submenuChannel: menuClassHistory
             labelImage: (ResourceRetriever ToolbarIconLibrary startNewSystemBrowserIcon)
             argument: 'Tools::NewSystemBrowser'
@@ -3674,17 +3673,6 @@
     ^ (Smalltalk at:#'SQL::ODBCScratchpad') notNil
 !
 
-systemBrowserItemVisible
-    |holder|
-
-    (holder := builder bindingAt:#systemBrowserItemVisible) isNil ifTrue:[
-        builder
-            aspectAt:#systemBrowserItemVisible
-            put:(holder := ValueHolder with:UserPreferences current useNewSystemBrowser not).
-    ].
-    ^ holder
-!
-
 tabList
     ^ resources array:#('Transcript' 'Errors').
 !