NewLauncher.st
changeset 16931 8da61202e106
parent 16930 1db8f8610422
child 16977 6070c93db0f9
child 17134 c4cce8b7a95d
--- 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').
 !