# HG changeset patch # User Claus Gittinger # Date 895620021 -7200 # Node ID b44c0047291f7071901b414ce177cba93761558e # Parent 13793eec85d5ee7eb7897a551c6f8be93b45a862 national strings diff -r 13793eec85d5 -r b44c0047291f MenuEditor.st --- a/MenuEditor.st Wed May 20 01:16:44 1998 +0200 +++ b/MenuEditor.st Wed May 20 01:20:21 1998 +0200 @@ -212,7 +212,7 @@ 'Creates a new menu spec.' #filePickAMenu -'Changes the cursor for moving it over another menu view to load its menu spec.' +'Select a menu from an open view and read its specification' #fileSave 'Saves current menu spec and if modified the help spec.' @@ -233,6 +233,8 @@ 'Selector returning an image.' ) + + "Modified: / 20.5.1998 / 00:42:49 / cg" ! ! !MenuEditor class methodsFor:'image specs'! @@ -977,11 +979,11 @@ #window: #(#WindowSpec #name: 'Menu Editor' - #layout: #(#LayoutFrame 88 0 294 0 627 0 673 0) + #layout: #(#LayoutFrame 189 0 552 0 872 0 931 0) #label: 'Menu Editor' #min: #(#Point 510 390) #max: #(#Point 1152 900) - #bounds: #(#Rectangle 88 294 628 674) + #bounds: #(#Rectangle 189 552 873 932) #menu: #menu #usePreferredExtent: false ) @@ -1037,7 +1039,7 @@ ) ) ) - #handles: #(#Any 0.384483 1.0) + #handles: #(#Any 0.30117 1.0) ) #(#UISubSpecification #name: 'InfoBarSubSpec' @@ -1048,6 +1050,8 @@ ) ) ) + + "Modified: / 20.5.1998 / 01:18:39 / cg" ! ! !MenuEditor class methodsFor:'menu specs'! @@ -1073,6 +1077,7 @@ #( #(#MenuItem #label: 'About' + #translateLabel: true #accessCharacterPosition: 1 #labelImage: #(#ResourceRetriever nil #menuIcon) #submenuChannel: #menuAbout @@ -1080,6 +1085,7 @@ #(#MenuItem #label: 'File' #activeHelpKey: #file + #translateLabel: true #submenu: #(#Menu @@ -1087,6 +1093,7 @@ #(#MenuItem #label: 'New' #value: #doNew + #translateLabel: true #activeHelpKey: #fileNew ) #(#MenuItem @@ -1103,11 +1110,13 @@ ) #(#MenuItem #label: 'Save' + #translateLabel: true #value: #doSave #activeHelpKey: #fileSave ) #(#MenuItem #label: 'Save As...' + #translateLabel: true #value: #doSaveAs #activeHelpKey: #fileSaveAs ) @@ -1116,6 +1125,7 @@ ) #(#MenuItem #label: 'Pick A Menu...' + #translateLabel: true #value: #doPickAMenu #activeHelpKey: #filePickAMenu ) @@ -1124,6 +1134,7 @@ ) #(#MenuItem #label: 'Browse Class' + #translateLabel: true #value: #doBrowseClass #activeHelpKey: #fileBrowseClass ) @@ -1143,16 +1154,19 @@ #(#MenuItem #label: 'Edit' #activeHelpKey: #edit + #translateLabel: true #submenuChannel: #menuEdit ) #(#MenuItem #label: 'Add' #activeHelpKey: #add + #translateLabel: true #submenuChannel: #menuAdd ) #(#MenuItem #label: 'Test' #activeHelpKey: #test + #translateLabel: true #submenuChannel: #submenuTest ) #(#MenuItem @@ -1163,6 +1177,7 @@ #( #(#MenuItem #label: 'Fonts' + #translateLabel: true #submenuChannel: #menuFont ) ) nil @@ -1172,10 +1187,12 @@ #(#MenuItem #label: 'History' #activeHelpKey: #history + #translateLabel: true #submenuChannel: #menuHistory ) #(#MenuItem #label: 'Help' + #translateLabel: true #startGroup: #right #submenu: #(#Menu @@ -1184,6 +1201,7 @@ #(#MenuItem #label: 'Documentation' #value: #openHTMLDocument: + #translateLabel: true #activeHelpKey: #helpTutorial #argument: 'tools/uipainter/MenuEditor.html' ) @@ -1193,6 +1211,7 @@ #(#MenuItem #label: 'Help Tool' #value: #openHTMLDocument: + #translateLabel: true #activeHelpKey: #helpHelpTool #argument: 'tools/uipainter/HelpTool.html' ) @@ -1201,6 +1220,7 @@ ) #(#MenuItem #label: 'Show Help Texts' + #translateLabel: true #activeHelpKey: #helpShowHelp #indication: #showHelp: ) @@ -1211,6 +1231,8 @@ ) nil nil ) + + "Modified: / 20.5.1998 / 00:36:34 / cg" ! menuAdd @@ -1234,12 +1256,14 @@ #( #(#MenuItem #label: 'Menu Item' + #translateLabel: true #value: #doCreateItem #activeHelpKey: #addMenuItem #labelImage: #(#ResourceRetriever #MenuEditor #menuItemImage 'Menu Item') ) #(#MenuItem #label: 'Menu Separator' + #translateLabel: true #value: #doCreateSep #activeHelpKey: #addMenuSeparator #labelImage: #(#ResourceRetriever #MenuEditor #menuSeparatorImage 'Menu Separator') @@ -1249,12 +1273,14 @@ ) #(#MenuItem #label: 'Submenu' + #translateLabel: true #value: #doCreateMenu #activeHelpKey: #addSubMenu #labelImage: #(#ResourceRetriever #MenuEditor #submenuImage 'Submenu') ) #(#MenuItem #label: 'Submenu Link' + #translateLabel: true #value: #doCreateLink #activeHelpKey: #addSubMenuLink #labelImage: #(#ResourceRetriever #MenuEditor #linkSubmenuImage 'Submenu Link') @@ -1262,6 +1288,8 @@ ) nil nil ) + + "Modified: / 20.5.1998 / 00:40:39 / cg" ! menuDefaultLink @@ -1313,6 +1341,7 @@ #(#MenuItem #label: 'Cut' #value: #doCut + #translateLabel: true #activeHelpKey: #editCut #enabled: #hasValidSelection #shortcutKeyCharacter: #Cut @@ -1320,6 +1349,7 @@ #(#MenuItem #label: 'Copy' #value: #doCopy + #translateLabel: true #activeHelpKey: #editCopy #enabled: #hasValidSelection #shortcutKeyCharacter: #Copy @@ -1327,6 +1357,7 @@ #(#MenuItem #label: 'Paste' #value: #doPaste + #translateLabel: true #activeHelpKey: #editPaste #enabled: #valueOfCanPaste #shortcutKeyCharacter: #Paste @@ -1334,6 +1365,7 @@ #(#MenuItem #label: 'Delete' #value: #doDelete + #translateLabel: true #activeHelpKey: #editDelete #enabled: #hasValidSelection #shortcutKeyCharacter: #Delete @@ -1344,30 +1376,36 @@ #(#MenuItem #label: 'Move Up' #value: #doStepUp + #translateLabel: true #activeHelpKey: #editMoveUp #enabled: #valueOfEnableMovingUpOrDown ) #(#MenuItem #label: 'Move Down' #value: #doStepDown + #translateLabel: true #activeHelpKey: #editMoveDown #enabled: #valueOfEnableMovingUpOrDown ) #(#MenuItem #label: 'Move In' #value: #doStepIn + #translateLabel: true #activeHelpKey: #editMoveIn #enabled: #valueOfEnableMovingIn ) #(#MenuItem #label: 'Move Out' #value: #doStepOut + #translateLabel: true #activeHelpKey: #editMoveOut #enabled: #valueOfEnableMovingOut ) ) nil nil ) + + "Modified: / 20.5.1998 / 00:37:16 / cg" ! menuToolbar