Mercurial Mercurial > hg > stx-libtool / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Thu, 04 Dec 2003 16:17:05 +0100
changeset 5398 61e42b6e1b84
parent 5397 4a35da2c915b
child 5399 3fa323d28c8e
*** empty log message ***
AbstractFileBrowser.st file | annotate | diff | comparison | revisions
FileBrowserV2.st file | annotate | diff | comparison | revisions 
--- a/AbstractFileBrowser.st	Thu Dec 04 16:14:09 2003 +0100
+++ b/AbstractFileBrowser.st	Thu Dec 04 16:17:05 2003 +0100
@@ -512,6 +512,26 @@
       )
 ! !
 
+!AbstractFileBrowser class methodsFor:'help specs'!
+
+helpSpec
+    "This resource specification was automatically generated
+     by the UIHelpTool of ST/X."
+
+    "Do not manually edit this!! If it is corrupted,
+     the UIHelpTool may not be able to read the specification."
+
+    "
+     UIHelpTool openOnClass:AbstractFileBrowser    
+    "
+
+    <resource: #help>
+
+    ^ super helpSpec addPairsFrom:#(
+
+)
+! !
+
 !AbstractFileBrowser class methodsFor:'image'!
 
 disabledCursorImage
@@ -6418,5 +6438,5 @@
 !AbstractFileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.189 2003-12-01 11:13:50 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.190 2003-12-04 15:17:05 cg Exp $'
 ! !
--- a/FileBrowserV2.st	Thu Dec 04 16:14:09 2003 +0100
+++ b/FileBrowserV2.st	Thu Dec 04 16:17:05 2003 +0100
@@ -378,6 +378,15 @@
 
     ^ super helpSpec addPairsFrom:#(
 
+#editFile
+''
+
+#fileIn
+''
+
+#searchFile
+''
+
 #toggleDetails
 ''
 
@@ -946,180 +955,188 @@
     <resource: #menu>
 
     ^ 
-     #(#Menu
-        #(
-         #(#MenuItem
-            #activeHelpKey: #directoryUp
-            #enabled: #enableDirectoryUp
-            #label: 'DirectoryUp'
-            #itemValue: #doGoDirectoryUp
-            #translateLabel: true
-            #isButton: true
-            #labelImage: #(#ResourceRetriever #AbstractFileBrowser #upArrowIcon)
+     #(Menu
+        (
+         (MenuItem
+            activeHelpKey: directoryUp
+            enabled: enableDirectoryUp
+            label: 'DirectoryUp'
+            itemValue: doGoDirectoryUp
+            translateLabel: true
+            isButton: true
+            labelImage: (ResourceRetriever AbstractFileBrowser upArrowIcon)
           )
-         #(#MenuItem
-            #label: ''
+         (MenuItem
+            label: ''
           )
-         #(#MenuItem
-            #activeHelpKey: #directoryBack
-            #enabled: #enableBack
-            #label: 'Back'
-            #itemValue: #doBack
-            #translateLabel: true
-            #isButton: true
-            #submenuChannel: #menuDirHistoryBack
-            #labelImage: #(#ResourceRetriever #AbstractFileBrowser #leftArrowIcon)
+         (MenuItem
+            activeHelpKey: directoryBack
+            enabled: enableBack
+            label: 'Back'
+            itemValue: doBack
+            translateLabel: true
+            isButton: true
+            submenuChannel: menuDirHistoryBack
+            labelImage: (ResourceRetriever AbstractFileBrowser leftArrowIcon)
           )
-         #(#MenuItem
-            #label: ''
+         (MenuItem
+            label: ''
           )
-         #(#MenuItem
-            #activeHelpKey: #directoryForward
-            #enabled: #enableForward
-            #label: 'Forward'
-            #itemValue: #doForward
-            #translateLabel: true
-            #isButton: true
-            #submenuChannel: #menuDirHistoryForward
-            #labelImage: #(#ResourceRetriever #AbstractFileBrowser #rightArrowIcon)
+         (MenuItem
+            activeHelpKey: directoryForward
+            enabled: enableForward
+            label: 'Forward'
+            itemValue: doForward
+            translateLabel: true
+            isButton: true
+            submenuChannel: menuDirHistoryForward
+            labelImage: (ResourceRetriever AbstractFileBrowser rightArrowIcon)
           )
-         #(#MenuItem
-            #label: ''
+         (MenuItem
+            label: ''
           )
-         #(#MenuItem
-            #activeHelpKey: #fileHome
-            #enabled: #enableHome
-            #label: 'Home'
-            #itemValue: #doGotoHomeDirectory
-            #translateLabel: true
-            #isButton: true
-            #labelImage: #(#ResourceRetriever #AbstractFileBrowser #goHomeIcon)
+         (MenuItem
+            activeHelpKey: fileHome
+            enabled: enableHome
+            label: 'Home'
+            itemValue: doGotoHomeDirectory
+            translateLabel: true
+            isButton: true
+            labelImage: (ResourceRetriever AbstractFileBrowser goHomeIcon)
           )
-         #(#MenuItem
-            #activeHelpKey: #fileGotoDefault
-            #enabled: #enableGotoDefault
-            #label: 'ST/X Default'
-            #itemValue: #doGotoDefaultDirectory
-            #translateLabel: true
-            #isButton: true
-            #labelImage: #(#ResourceRetriever #AbstractFileBrowser #gotoDefaultDirectoryIcon)
+         (MenuItem
+            activeHelpKey: fileGotoDefault
+            enabled: enableGotoDefault
+            label: 'ST/X Default'
+            itemValue: doGotoDefaultDirectory
+            translateLabel: true
+            isButton: true
+            labelImage: (ResourceRetriever AbstractFileBrowser gotoDefaultDirectoryIcon)
           )
-         #(#MenuItem
-            #label: ''
+         (MenuItem
+            label: ''
           )
-         #(#MenuItem
-            #activeHelpKey: #fileHistory
-            #enabled: #enableFileHistory
-            #label: 'File History'
-            #translateLabel: true
-            #isButton: true
-            #submenuChannel: #menuFileHistory
-            #labelImage: #(#ResourceRetriever #AbstractFileBrowser #historyIcon)
+         (MenuItem
+            activeHelpKey: fileHistory
+            enabled: enableFileHistory
+            label: 'File History'
+            translateLabel: true
+            isButton: true
+            submenuChannel: menuFileHistory
+            labelImage: (ResourceRetriever AbstractFileBrowser historyIcon)
+          )
+         (MenuItem
+            label: '-'
           )
-         #(#MenuItem
-            #label: '-'
+         (MenuItem
+            activeHelpKey: cutFile
+            enabled: hasSelection
+            label: 'Cut'
+            itemValue: cutFiles
+            translateLabel: true
+            isButton: true
+            labelImage: (ResourceRetriever AbstractFileBrowser cutIcon)
           )
-         #(#MenuItem
-            #activeHelpKey: #cutFile
-            #enabled: #hasSelection
-            #label: 'Cut'
-            #itemValue: #cutFiles
-            #translateLabel: true
-            #isButton: true
-            #labelImage: #(#ResourceRetriever #AbstractFileBrowser #cutIcon)
+         (MenuItem
+            activeHelpKey: copyFile
+            enabled: hasSelection
+            label: 'Copy'
+            itemValue: copyFiles
+            translateLabel: true
+            isButton: true
+            labelImage: (ResourceRetriever AbstractFileBrowser copyIcon)
           )
-         #(#MenuItem
-            #activeHelpKey: #copyFile
-            #enabled: #hasSelection
-            #label: 'Copy'
-            #itemValue: #copyFiles
-            #translateLabel: true
-            #isButton: true
-            #labelImage: #(#ResourceRetriever #AbstractFileBrowser #copyIcon)
+         (MenuItem
+            activeHelpKey: pasteFile
+            enabled: canPaste
+            label: 'Paste'
+            itemValue: pasteFiles
+            translateLabel: true
+            isButton: true
+            labelImage: (ResourceRetriever AbstractFileBrowser pasteIcon)
           )
-         #(#MenuItem
-            #activeHelpKey: #pasteFile
-            #enabled: #canPaste
-            #label: 'Paste'
-            #itemValue: #pasteFiles
-            #translateLabel: true
-            #isButton: true
-            #labelImage: #(#ResourceRetriever #AbstractFileBrowser #pasteIcon)
+         (MenuItem
+            activeHelpKey: deleteFile
+            enabled: hasSelection
+            label: 'Delete'
+            itemValue: deleteFiles
+            translateLabel: true
+            isButton: true
+            labelImage: (ResourceRetriever AbstractFileBrowser deleteIcon)
           )
-         #(#MenuItem
-            #activeHelpKey: #deleteFile
-            #enabled: #hasSelection
-            #label: 'Delete'
-            #itemValue: #deleteFiles
-            #translateLabel: true
-            #isButton: true
-            #labelImage: #(#ResourceRetriever #AbstractFileBrowser #deleteIcon)
+         (MenuItem
+            label: '-'
+          )
+         (MenuItem
+            activeHelpKey: fileIn
+            label: 'File In'
+            itemValue: fileFileIn
+            translateLabel: true
+            isButton: true
+            labelImage: (ResourceRetriever AbstractFileBrowser fileInIcon)
           )
-         #(#MenuItem
-            #label: '-'
+         (MenuItem
+            label: ''
           )
-         #(#MenuItem
-            #activeHelpKey: #fileIn
-            #label: 'File In'
-            #itemValue: #fileFileIn
-            #translateLabel: true
-            #isButton: true
-            #labelImage: #(#ResourceRetriever #AbstractFileBrowser #fileInIcon)
-          )
-         #(#MenuItem
-            #label: ''
+         (MenuItem
+            activeHelpKey: editFile
+            label: 'Edit File'
+            itemValue: doShowFileContents
+            translateLabel: true
+            isButton: true
+            labelImage: (ResourceRetriever ToolbarIconLibrary edit20x20Icon)
           )
-         #(#MenuItem
-            #activeHelpKey: #searchFile
-            #label: 'Search File'
-            #itemValue: #doOpenSearchFile
-            #translateLabel: true
-            #isButton: true
-            #labelImage: #(#ResourceRetriever #AbstractFileBrowser #searchIcon)
+         (MenuItem
+            activeHelpKey: searchFile
+            label: 'Search File'
+            itemValue: doOpenSearchFile
+            translateLabel: true
+            isButton: true
+            labelImage: (ResourceRetriever AbstractFileBrowser searchIcon)
           )
-         #(#MenuItem
-            #activeHelpKey: #addTerminal
-            #label: 'VT100'
-            #itemValue: #doAddTerminal
-            #translateLabel: true
-            #isButton: true
-            #labelImage: #(#ResourceRetriever #AbstractFileBrowser #shellWithoutTextIcon)
+         (MenuItem
+            activeHelpKey: addTerminal
+            label: 'VT100'
+            itemValue: doAddTerminal
+            translateLabel: true
+            isButton: true
+            labelImage: (ResourceRetriever AbstractFileBrowser shellWithoutTextIcon)
           )
-         #(#MenuItem
-            #activeHelpKey: #make
-            #enabled: #canMake
-            #label: 'Make'
-            #itemValue: #doMake
-            #translateLabel: true
-            #isButton: true
-            #labelImage: #(#ResourceRetriever #AbstractFileBrowser #makeIcon)
+         (MenuItem
+            activeHelpKey: make
+            enabled: canMake
+            label: 'Make'
+            itemValue: doMake
+            translateLabel: true
+            isButton: true
+            labelImage: (ResourceRetriever AbstractFileBrowser makeIcon)
           )
-         #(#MenuItem
-            #label: 'viewDetails'
-            #translateLabel: true
-            #isButton: true
-            #startGroup: #right
-            #hideMenuOnActivated: false
-            #indication: #viewDetails
-            #labelImage: #(#ResourceRetriever nil #viewDetailsIcon)
+         (MenuItem
+            label: 'viewDetails'
+            translateLabel: true
+            isButton: true
+            startGroup: right
+            hideMenuOnActivated: false
+            indication: viewDetails
+            labelImage: (ResourceRetriever nil viewDetailsIcon)
           )
-         #(#MenuItem
-            #activeHelpKey: #toggleDetails
-            #label: 'viewDetails'
-            #translateLabel: true
-            #isButton: true
-            #startGroup: #right
-            #isVisible: false
-            #indication: #viewDetails
-            #submenuChannel: #viewDetailsMenuSpec
-            #labelImage: #(#ResourceRetriever nil #viewDetailsIcon)
+         (MenuItem
+            activeHelpKey: toggleDetails
+            label: 'viewDetails'
+            translateLabel: true
+            isButton: true
+            startGroup: right
+            isVisible: false
+            indication: viewDetails
+            submenuChannel: viewDetailsMenuSpec
+            labelImage: (ResourceRetriever nil viewDetailsIcon)
           )
-         #(#MenuItem
-            #label: ''
-            #isButton: true
-            #startGroup: #right
-            #submenuChannel: #viewDetailsMenuSpec
-            #labelImage: #(#ResourceRetriever #ToolbarIconLibrary #empty1x20Icon)
+         (MenuItem
+            label: ''
+            isButton: true
+            startGroup: right
+            submenuChannel: viewDetailsMenuSpec
+            labelImage: (ResourceRetriever ToolbarIconLibrary empty1x20Icon)
           )
          )
         nil
@@ -1628,7 +1645,7 @@
 !FileBrowserV2 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.97 2003-12-03 08:17:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.98 2003-12-04 15:16:58 cg Exp $'
 ! !
 
 FileBrowserV2 initialize!
hg/stx-libtool