944 " |
953 " |
945 |
954 |
946 <resource: #menu> |
955 <resource: #menu> |
947 |
956 |
948 ^ |
957 ^ |
949 #(#Menu |
958 #(Menu |
950 #( |
959 ( |
951 #(#MenuItem |
960 (MenuItem |
952 #activeHelpKey: #directoryUp |
961 activeHelpKey: directoryUp |
953 #enabled: #enableDirectoryUp |
962 enabled: enableDirectoryUp |
954 #label: 'DirectoryUp' |
963 label: 'DirectoryUp' |
955 #itemValue: #doGoDirectoryUp |
964 itemValue: doGoDirectoryUp |
956 #translateLabel: true |
965 translateLabel: true |
957 #isButton: true |
966 isButton: true |
958 #labelImage: #(#ResourceRetriever #AbstractFileBrowser #upArrowIcon) |
967 labelImage: (ResourceRetriever AbstractFileBrowser upArrowIcon) |
959 ) |
968 ) |
960 #(#MenuItem |
969 (MenuItem |
961 #label: '' |
970 label: '' |
962 ) |
971 ) |
963 #(#MenuItem |
972 (MenuItem |
964 #activeHelpKey: #directoryBack |
973 activeHelpKey: directoryBack |
965 #enabled: #enableBack |
974 enabled: enableBack |
966 #label: 'Back' |
975 label: 'Back' |
967 #itemValue: #doBack |
976 itemValue: doBack |
968 #translateLabel: true |
977 translateLabel: true |
969 #isButton: true |
978 isButton: true |
970 #submenuChannel: #menuDirHistoryBack |
979 submenuChannel: menuDirHistoryBack |
971 #labelImage: #(#ResourceRetriever #AbstractFileBrowser #leftArrowIcon) |
980 labelImage: (ResourceRetriever AbstractFileBrowser leftArrowIcon) |
972 ) |
981 ) |
973 #(#MenuItem |
982 (MenuItem |
974 #label: '' |
983 label: '' |
975 ) |
984 ) |
976 #(#MenuItem |
985 (MenuItem |
977 #activeHelpKey: #directoryForward |
986 activeHelpKey: directoryForward |
978 #enabled: #enableForward |
987 enabled: enableForward |
979 #label: 'Forward' |
988 label: 'Forward' |
980 #itemValue: #doForward |
989 itemValue: doForward |
981 #translateLabel: true |
990 translateLabel: true |
982 #isButton: true |
991 isButton: true |
983 #submenuChannel: #menuDirHistoryForward |
992 submenuChannel: menuDirHistoryForward |
984 #labelImage: #(#ResourceRetriever #AbstractFileBrowser #rightArrowIcon) |
993 labelImage: (ResourceRetriever AbstractFileBrowser rightArrowIcon) |
985 ) |
994 ) |
986 #(#MenuItem |
995 (MenuItem |
987 #label: '' |
996 label: '' |
988 ) |
997 ) |
989 #(#MenuItem |
998 (MenuItem |
990 #activeHelpKey: #fileHome |
999 activeHelpKey: fileHome |
991 #enabled: #enableHome |
1000 enabled: enableHome |
992 #label: 'Home' |
1001 label: 'Home' |
993 #itemValue: #doGotoHomeDirectory |
1002 itemValue: doGotoHomeDirectory |
994 #translateLabel: true |
1003 translateLabel: true |
995 #isButton: true |
1004 isButton: true |
996 #labelImage: #(#ResourceRetriever #AbstractFileBrowser #goHomeIcon) |
1005 labelImage: (ResourceRetriever AbstractFileBrowser goHomeIcon) |
997 ) |
1006 ) |
998 #(#MenuItem |
1007 (MenuItem |
999 #activeHelpKey: #fileGotoDefault |
1008 activeHelpKey: fileGotoDefault |
1000 #enabled: #enableGotoDefault |
1009 enabled: enableGotoDefault |
1001 #label: 'ST/X Default' |
1010 label: 'ST/X Default' |
1002 #itemValue: #doGotoDefaultDirectory |
1011 itemValue: doGotoDefaultDirectory |
1003 #translateLabel: true |
1012 translateLabel: true |
1004 #isButton: true |
1013 isButton: true |
1005 #labelImage: #(#ResourceRetriever #AbstractFileBrowser #gotoDefaultDirectoryIcon) |
1014 labelImage: (ResourceRetriever AbstractFileBrowser gotoDefaultDirectoryIcon) |
1006 ) |
1015 ) |
1007 #(#MenuItem |
1016 (MenuItem |
1008 #label: '' |
1017 label: '' |
1009 ) |
1018 ) |
1010 #(#MenuItem |
1019 (MenuItem |
1011 #activeHelpKey: #fileHistory |
1020 activeHelpKey: fileHistory |
1012 #enabled: #enableFileHistory |
1021 enabled: enableFileHistory |
1013 #label: 'File History' |
1022 label: 'File History' |
1014 #translateLabel: true |
1023 translateLabel: true |
1015 #isButton: true |
1024 isButton: true |
1016 #submenuChannel: #menuFileHistory |
1025 submenuChannel: menuFileHistory |
1017 #labelImage: #(#ResourceRetriever #AbstractFileBrowser #historyIcon) |
1026 labelImage: (ResourceRetriever AbstractFileBrowser historyIcon) |
1018 ) |
1027 ) |
1019 #(#MenuItem |
1028 (MenuItem |
1020 #label: '-' |
1029 label: '-' |
1021 ) |
1030 ) |
1022 #(#MenuItem |
1031 (MenuItem |
1023 #activeHelpKey: #cutFile |
1032 activeHelpKey: cutFile |
1024 #enabled: #hasSelection |
1033 enabled: hasSelection |
1025 #label: 'Cut' |
1034 label: 'Cut' |
1026 #itemValue: #cutFiles |
1035 itemValue: cutFiles |
1027 #translateLabel: true |
1036 translateLabel: true |
1028 #isButton: true |
1037 isButton: true |
1029 #labelImage: #(#ResourceRetriever #AbstractFileBrowser #cutIcon) |
1038 labelImage: (ResourceRetriever AbstractFileBrowser cutIcon) |
1030 ) |
1039 ) |
1031 #(#MenuItem |
1040 (MenuItem |
1032 #activeHelpKey: #copyFile |
1041 activeHelpKey: copyFile |
1033 #enabled: #hasSelection |
1042 enabled: hasSelection |
1034 #label: 'Copy' |
1043 label: 'Copy' |
1035 #itemValue: #copyFiles |
1044 itemValue: copyFiles |
1036 #translateLabel: true |
1045 translateLabel: true |
1037 #isButton: true |
1046 isButton: true |
1038 #labelImage: #(#ResourceRetriever #AbstractFileBrowser #copyIcon) |
1047 labelImage: (ResourceRetriever AbstractFileBrowser copyIcon) |
1039 ) |
1048 ) |
1040 #(#MenuItem |
1049 (MenuItem |
1041 #activeHelpKey: #pasteFile |
1050 activeHelpKey: pasteFile |
1042 #enabled: #canPaste |
1051 enabled: canPaste |
1043 #label: 'Paste' |
1052 label: 'Paste' |
1044 #itemValue: #pasteFiles |
1053 itemValue: pasteFiles |
1045 #translateLabel: true |
1054 translateLabel: true |
1046 #isButton: true |
1055 isButton: true |
1047 #labelImage: #(#ResourceRetriever #AbstractFileBrowser #pasteIcon) |
1056 labelImage: (ResourceRetriever AbstractFileBrowser pasteIcon) |
1048 ) |
1057 ) |
1049 #(#MenuItem |
1058 (MenuItem |
1050 #activeHelpKey: #deleteFile |
1059 activeHelpKey: deleteFile |
1051 #enabled: #hasSelection |
1060 enabled: hasSelection |
1052 #label: 'Delete' |
1061 label: 'Delete' |
1053 #itemValue: #deleteFiles |
1062 itemValue: deleteFiles |
1054 #translateLabel: true |
1063 translateLabel: true |
1055 #isButton: true |
1064 isButton: true |
1056 #labelImage: #(#ResourceRetriever #AbstractFileBrowser #deleteIcon) |
1065 labelImage: (ResourceRetriever AbstractFileBrowser deleteIcon) |
1057 ) |
1066 ) |
1058 #(#MenuItem |
1067 (MenuItem |
1059 #label: '-' |
1068 label: '-' |
1060 ) |
1069 ) |
1061 #(#MenuItem |
1070 (MenuItem |
1062 #activeHelpKey: #fileIn |
1071 activeHelpKey: fileIn |
1063 #label: 'File In' |
1072 label: 'File In' |
1064 #itemValue: #fileFileIn |
1073 itemValue: fileFileIn |
1065 #translateLabel: true |
1074 translateLabel: true |
1066 #isButton: true |
1075 isButton: true |
1067 #labelImage: #(#ResourceRetriever #AbstractFileBrowser #fileInIcon) |
1076 labelImage: (ResourceRetriever AbstractFileBrowser fileInIcon) |
1068 ) |
1077 ) |
1069 #(#MenuItem |
1078 (MenuItem |
1070 #label: '' |
1079 label: '' |
1071 ) |
1080 ) |
1072 #(#MenuItem |
1081 (MenuItem |
1073 #activeHelpKey: #searchFile |
1082 activeHelpKey: editFile |
1074 #label: 'Search File' |
1083 label: 'Edit File' |
1075 #itemValue: #doOpenSearchFile |
1084 itemValue: doShowFileContents |
1076 #translateLabel: true |
1085 translateLabel: true |
1077 #isButton: true |
1086 isButton: true |
1078 #labelImage: #(#ResourceRetriever #AbstractFileBrowser #searchIcon) |
1087 labelImage: (ResourceRetriever ToolbarIconLibrary edit20x20Icon) |
1079 ) |
1088 ) |
1080 #(#MenuItem |
1089 (MenuItem |
1081 #activeHelpKey: #addTerminal |
1090 activeHelpKey: searchFile |
1082 #label: 'VT100' |
1091 label: 'Search File' |
1083 #itemValue: #doAddTerminal |
1092 itemValue: doOpenSearchFile |
1084 #translateLabel: true |
1093 translateLabel: true |
1085 #isButton: true |
1094 isButton: true |
1086 #labelImage: #(#ResourceRetriever #AbstractFileBrowser #shellWithoutTextIcon) |
1095 labelImage: (ResourceRetriever AbstractFileBrowser searchIcon) |
1087 ) |
1096 ) |
1088 #(#MenuItem |
1097 (MenuItem |
1089 #activeHelpKey: #make |
1098 activeHelpKey: addTerminal |
1090 #enabled: #canMake |
1099 label: 'VT100' |
1091 #label: 'Make' |
1100 itemValue: doAddTerminal |
1092 #itemValue: #doMake |
1101 translateLabel: true |
1093 #translateLabel: true |
1102 isButton: true |
1094 #isButton: true |
1103 labelImage: (ResourceRetriever AbstractFileBrowser shellWithoutTextIcon) |
1095 #labelImage: #(#ResourceRetriever #AbstractFileBrowser #makeIcon) |
1104 ) |
1096 ) |
1105 (MenuItem |
1097 #(#MenuItem |
1106 activeHelpKey: make |
1098 #label: 'viewDetails' |
1107 enabled: canMake |
1099 #translateLabel: true |
1108 label: 'Make' |
1100 #isButton: true |
1109 itemValue: doMake |
1101 #startGroup: #right |
1110 translateLabel: true |
1102 #hideMenuOnActivated: false |
1111 isButton: true |
1103 #indication: #viewDetails |
1112 labelImage: (ResourceRetriever AbstractFileBrowser makeIcon) |
1104 #labelImage: #(#ResourceRetriever nil #viewDetailsIcon) |
1113 ) |
1105 ) |
1114 (MenuItem |
1106 #(#MenuItem |
1115 label: 'viewDetails' |
1107 #activeHelpKey: #toggleDetails |
1116 translateLabel: true |
1108 #label: 'viewDetails' |
1117 isButton: true |
1109 #translateLabel: true |
1118 startGroup: right |
1110 #isButton: true |
1119 hideMenuOnActivated: false |
1111 #startGroup: #right |
1120 indication: viewDetails |
1112 #isVisible: false |
1121 labelImage: (ResourceRetriever nil viewDetailsIcon) |
1113 #indication: #viewDetails |
1122 ) |
1114 #submenuChannel: #viewDetailsMenuSpec |
1123 (MenuItem |
1115 #labelImage: #(#ResourceRetriever nil #viewDetailsIcon) |
1124 activeHelpKey: toggleDetails |
1116 ) |
1125 label: 'viewDetails' |
1117 #(#MenuItem |
1126 translateLabel: true |
1118 #label: '' |
1127 isButton: true |
1119 #isButton: true |
1128 startGroup: right |
1120 #startGroup: #right |
1129 isVisible: false |
1121 #submenuChannel: #viewDetailsMenuSpec |
1130 indication: viewDetails |
1122 #labelImage: #(#ResourceRetriever #ToolbarIconLibrary #empty1x20Icon) |
1131 submenuChannel: viewDetailsMenuSpec |
|
1132 labelImage: (ResourceRetriever nil viewDetailsIcon) |
|
1133 ) |
|
1134 (MenuItem |
|
1135 label: '' |
|
1136 isButton: true |
|
1137 startGroup: right |
|
1138 submenuChannel: viewDetailsMenuSpec |
|
1139 labelImage: (ResourceRetriever ToolbarIconLibrary empty1x20Icon) |
1123 ) |
1140 ) |
1124 ) |
1141 ) |
1125 nil |
1142 nil |
1126 nil |
1143 nil |
1127 ) |
1144 ) |