AbstractFileBrowser.st
changeset 6022 f2a53298475e
parent 5977 66af015a4a18
child 6031 e30ceda65e5c
equal deleted inserted replaced
6021:e25ed9197b7d 6022:f2a53298475e
  2132             itemValue: openChangeSetBrowser
  2132             itemValue: openChangeSetBrowser
  2133             translateLabel: true
  2133             translateLabel: true
  2134             isVisible: false
  2134             isVisible: false
  2135           )
  2135           )
  2136          (MenuItem
  2136          (MenuItem
       
  2137             enabled: hasFileSelection
       
  2138             label: 'Workspace'
       
  2139             itemValue: openWorkspace
       
  2140             translateLabel: true
       
  2141           )
       
  2142          (MenuItem
  2137             enabled: hasSnapshotSelection
  2143             enabled: hasSnapshotSelection
  2138             label: 'Snapshot Image Browser'
  2144             label: 'Snapshot Image Browser'
  2139             itemValue: openSnapshotImageBrowser
  2145             itemValue: openSnapshotImageBrowser
  2140             translateLabel: true
  2146             translateLabel: true
  2141           )
  2147           )
  2142          (MenuItem
  2148          (MenuItem
  2143             enabled: canCreateNewProject
  2149             enabled: canCreateNewProject
  2144             label: 'Create Smalltalk Project'
  2150             label: 'Create Smalltalk Project'
  2145             itemValue: createProjectAndOpenProjectBrowser
  2151             itemValue: createProjectAndOpenProjectBrowser
  2146             translateLabel: true
  2152             translateLabel: true
       
  2153           )
       
  2154          (MenuItem
       
  2155             label: '-'
  2147           )
  2156           )
  2148          (MenuItem
  2157          (MenuItem
  2149             enabled: canReadAbbrevFile
  2158             enabled: canReadAbbrevFile
  2150             label: 'Install Autoloaded'
  2159             label: 'Install Autoloaded'
  2151             itemValue: readAbbrevFile
  2160             itemValue: readAbbrevFile
  5714         ].
  5723         ].
  5715     ].
  5724     ].
  5716     ^ tool
  5725     ^ tool
  5717 !
  5726 !
  5718 
  5727 
       
  5728 openWorkspace
       
  5729     self 
       
  5730         openTool:WorkspaceApplication 
       
  5731         with:#openOnFile:
       
  5732         ignoreDirectories:true
       
  5733 !
       
  5734 
  5719 openXV
  5735 openXV
  5720     self openOSCommandWithFiles:'xv'
  5736     self openOSCommandWithFiles:'xv'
  5721 !
  5737 !
  5722 
  5738 
  5723 openZipTool
  5739 openZipTool
  6903 ! !
  6919 ! !
  6904 
  6920 
  6905 !AbstractFileBrowser class methodsFor:'documentation'!
  6921 !AbstractFileBrowser class methodsFor:'documentation'!
  6906 
  6922 
  6907 version
  6923 version
  6908     ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.252 2004-08-18 09:03:47 cg Exp $'
  6924     ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.253 2004-09-15 14:33:04 cg Exp $'
  6909 ! !
  6925 ! !