hg/stx-libtool: comparison FileBrowser.st

equal deleted inserted replaced

-:40b198182b70
+:2114f63d210d
 ^
 #(#Menu
 #(
 #(#MenuItem
 #label: 'Copy Path'
+#itemValue: #copyPath
 #translateLabel: true
-#value: #copyPath
 )
 #(#MenuItem
 #label: '-'
 )
 #(#MenuItem
+#label: 'Copy'
+#itemValue: #copySelection
+#translateLabel: true
+#sendToOriginator: true
+)
+#(#MenuItem
+#label: 'Cut'
+#itemValue: #cutSelection
+#translateLabel: true
+#sendToOriginator: true
+)
+#(#MenuItem
+#label: 'Paste'
+#itemValue: #pasteSelection
+#translateLabel: true
+#sendToOriginator: true
+)
+#(#MenuItem
+#label: '-'
+)
+#(#MenuItem
+#enabled: #currentDirectoryIsNotTop
 #label: 'Up'
+#itemValue: #changeToParentDirectory
 #translateLabel: true
-#value: #changeToParentDirectory
-#enabled: #currentDirectoryIsNotTop
 )
 #(#MenuItem
 #label: 'Goto...'
+#itemValue: #changeCurrentDirectory
 #translateLabel: true
-#value: #changeCurrentDirectory
 )
 #(#MenuItem
 #label: '-'
 )
 #(#MenuItem
 #label: 'Back'
+#itemValue: #changeToPreviousDirectory
 #translateLabel: true
-#value: #changeToPreviousDirectory
 )
 #(#MenuItem
 #label: '-'
 )
 #(#MenuItem
 #label: 'Default'
+#itemValue: #changeToDefaultDirectory
 #translateLabel: true
-#value: #changeToDefaultDirectory
 )
 #(#MenuItem
 #label: 'Home'
+#itemValue: #changeToHomeDirectory
 #translateLabel: true
-#value: #changeToHomeDirectory
 )
 #(#MenuItem
 #label: 'Bookmarks'
 #translateLabel: true
 #submenuChannel: #bookmarksMenuSpec
 labelMenu
 "return the popUpMenu for the path label"
 <resource: #programMenu>
-^ self menuFromSpec:(self class directoryMenuSpec).
+|m|
+m := self menuFromSpec:(self class directoryMenuSpec).
+^ m
 !
 labelMenu_old
 "return the popUpMenu for the path label"
 ! !
 !FileBrowser class methodsFor:'documentation'!
 version
-^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.512 2002-10-25 10:05:31 penk Exp $'
+^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.513 2002-10-26 15:53:57 ca Exp $'
 ! !

changeset 4069	2114f63d210d
parent 4053	4cb62ed9ca3b
child 4137	3fc15e6d9613