BookmarksEditDialog.st
branchjv
changeset 17214 c192b970f250
parent 12431 9f0c59c742d5
parent 17164 a0b8db17c6e4
child 17221 83d1d509d23b
--- a/BookmarksEditDialog.st	Mon Dec 12 11:58:14 2016 +0000
+++ b/BookmarksEditDialog.st	Fri Dec 16 23:51:53 2016 +0000
@@ -11,6 +11,8 @@
 "
 "{ Package: 'stx:libtool' }"
 
+"{ NameSpace: Smalltalk }"
+
 SimpleDialog subclass:#BookmarksEditDialog
 	instanceVariableNames:'selectedBookmarksHolder bookmarkListHolder defaultBookmark answer'
 	classVariableNames:''
@@ -42,36 +44,27 @@
     ^ super flyByHelpSpec addPairsFrom:#(
 
 #moveUp
-'Move Up'
+'Move the selected bookmark up in the list'
 
 #moveDown
-'Move Down'
+'Move the selected bookmark down in the list'
+
+#exportBookmarks
+'Export bookmarks to a file'
+
+#importBookmarks
+'Import bookmarks from a file'
+
+#newBookmark
+'Add a new bookmark'
+
+#removeBookmark
+'Remove the selected bookmark'
+
+#sortBookmarks
+'Sort bookmarks alphabetically'
 
 ).
-!
-
-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:BookmarksEditDialog    
-    "
-
-    <resource: #help>
-
-    ^ super helpSpec addPairsFrom:#(
-
-#moveDown
-''
-
-#moveUp
-''
-
-)
 ! !
 
 !BookmarksEditDialog class methodsFor:'image specs'!
@@ -248,6 +241,7 @@
     "Do not manually edit this!! If it is corrupted,
      the MenuEditor may not be able to read the specification."
 
+
     "
      MenuEditor new openOnClass:BookmarksEditDialog andSelector:#toolBarMenu
      (Menu new fromLiteralArrayEncoding:(BookmarksEditDialog toolBarMenu)) startUp
@@ -259,17 +253,17 @@
      #(Menu
         (
          (MenuItem
+            activeHelpKey: newBookmark
             label: 'New...'
             itemValue: new
-            translateLabel: true
             isButton: true
             labelImage: (ResourceRetriever XPToolbarIconLibrary newBookmark22x22Icon)
           )
          (MenuItem
+            activeHelpKey: removeBookmark
             enabled: removeButtonEnabledHolder
             label: 'Remove...'
             itemValue: remove
-            translateLabel: true
             isButton: true
             labelImage: (ResourceRetriever XPToolbarIconLibrary close22x22Icon)
           )
@@ -281,7 +275,6 @@
             enabled: upButtonEnabledHolder
             label: 'Up'
             itemValue: up
-            translateLabel: true
             isButton: true
             labelImage: (ResourceRetriever XPToolbarIconLibrary up22x22Icon)
           )
@@ -290,7 +283,6 @@
             enabled: downButtonEnabledHolder
             label: 'Down'
             itemValue: down
-            translateLabel: true
             isButton: true
             labelImage: (ResourceRetriever XPToolbarIconLibrary down22x22Icon)
           )
@@ -298,10 +290,10 @@
             label: '-'
           )
          (MenuItem
+            activeHelpKey: sortBookmarks
             enabled: sortButtonEnabledHolder
             label: 'Sort'
             itemValue: sort
-            translateLabel: true
             isButton: true
             labelImage: (ResourceRetriever BookmarksEditDialog sort22x22Icon)
           )
@@ -309,16 +301,16 @@
             label: '-'
           )
          (MenuItem
+            activeHelpKey: importBookmarks
             label: 'Import...'
             itemValue: import
-            translateLabel: true
             isButton: true
             labelImage: (ResourceRetriever XPToolbarIconLibrary fileIn22x22Icon)
           )
          (MenuItem
+            activeHelpKey: exportBookmarks
             label: 'Export...'
             itemValue: export
-            translateLabel: true
             isButton: true
             labelImage: (ResourceRetriever BookmarksEditDialog fileOut22x22Icon)
           )
@@ -326,8 +318,6 @@
         nil
         nil
       )
-
-    "Modified: / 17-01-2011 / 13:06:35 / cg"
 ! !
 
 !BookmarksEditDialog class methodsFor:'opening'!
@@ -649,7 +639,7 @@
 !
 
 version_CVS
-    ^ '§Header: /cvs/stx/stx/libtool/BookmarksEditDialog.st,v 1.10 2011/01/17 12:06:37 cg Exp §'
+    ^ 'Header: /cvs/stx/stx/libtool/BookmarksEditDialog.st,v 1.10 2011/01/17 12:06:37 cg Exp '
 !
 
 version_HG