# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1256202060 -7200
# Node ID 7fe0760c45542d582a6fc9aaeb1676754513c86d
# Parent  e5a95e26ed839c29d1cd04a8798ff8ff1c883b8c
added: #loadAndSaveSettingsItemVisible
changed:
        #mainMenu
        #windowSpec

diff -r e5a95e26ed83 -r 7fe0760c4554 SettingsDialog.st
--- a/SettingsDialog.st	Wed Oct 21 16:22:00 2009 +0200
+++ b/SettingsDialog.st	Thu Oct 22 11:01:00 2009 +0200
@@ -284,6 +284,7 @@
                        (HorizontalPanelViewSpec
                           name: 'HorizontalPanel2'
                           layout: (LayoutFrame 0 0.0 -34 1 0 1.0 0 1)
+                          visibilityChannel: loadAndSaveSettingsItemVisible
                           horizontalLayout: fitSpace
                           verticalLayout: center
                           horizontalSpace: 3
@@ -345,6 +346,7 @@
                           hasHorizontalScrollBar: false
                           hasVerticalScrollBar: false
                           clientHolder: subCanvasApplicationHolder
+                          createNewBuilder: false
                           postBuildCallback: postBuildSubCanvas:
                         )
                        (HorizontalPanelViewSpec
@@ -475,22 +477,27 @@
                   label: '&Load From...'
                   itemValue: loadSettingsFromFile
                   translateLabel: true
+                  isVisible: loadAndSaveSettingsItemVisible
                 )
                (MenuItem
                   label: '-'
+                  isVisible: loadAndSaveSettingsItemVisible
                 )
                (MenuItem
                   label: 'Save'
                   itemValue: saveSettingsWithoutAskingForFile
                   translateLabel: true
+                  isVisible: loadAndSaveSettingsItemVisible
                 )
                (MenuItem
                   label: '&Save As...'
                   itemValue: askForFileAndSaveSettings
                   translateLabel: true
+                  isVisible: loadAndSaveSettingsItemVisible
                 )
                (MenuItem
                   label: '-'
+                  isVisible: loadAndSaveSettingsItemVisible
                 )
                (MenuItem
                   label: 'E&xit'
@@ -1097,6 +1104,14 @@
     ^ enableReload.
 !
 
+loadAndSaveSettingsItemVisible
+    "for now, only show these if I have a requestor 
+     (i.e. I am a full settings Dialog as opposed to a DebugView, FileBrowser or other
+     settingsDialog. I think this has to be reworked..."
+
+    ^ requestor notNil "/ loadAndSaveSettingsItemVisible
+!
+
 selectedItem
     selectedItem isNil ifTrue:[
         selectedItem := ValueHolder new.
@@ -1408,7 +1423,11 @@
 !SettingsDialog class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.82 2009-05-12 10:09:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.83 2009-10-22 09:01:00 cg Exp $'
+!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.83 2009-10-22 09:01:00 cg Exp $'
 ! !
 
 SettingsDialog initialize!